SSSSSSSSSSSS_ YYY YYY SSSSSSSSSSSS LLL 000000000 AAAAAAAAA 
SSSSSSSSSSSS_ YYY YYY SSSSSSSSSSSS LLL 000000000 AAAAAAAAA 
SSSSSSSSSSSS_ YYY YYY SSSSSSSSSSSS LLL 000000000 AAAAAAAAA 
SSS YYY YYY SSS LLL 000 000 AAA AAA 
SSS vYY YYY SSS LLL 000 000 AAA ABA 
SSS YYY YYY SSS LLL 000 000 AAA AMA 
SSS yyy yYY SSS LLL 000 000 AAA ABA 
SSS yyy yYY SSS LLL 000 000 AAA AAL 
SSS yyy yYY SSS LLL 000 000 AAA AAA 
SSSSSSSSS vYY SSSSSSSSS LLL 000 000 AAA AAA 
SSSSSSSSS vYY SSSSSSSSS LLL 000 000 AAA 
SSSSSSSSS vYY SSSSSSSSS LLL 000 000 AAA AAA 
SSS YYY SSS LLL 000 000 A 
SSS YYY SSS LLL 000 000 AAAAAAAAAAAAAAA 
SSS YYY SSS LLL 000 000 AAAAAAAAAAAAAAA 
SSS vYY SSS) LLL 000 000 AAA 
SSS YYY SSS LLL 000 000 AAA AAA 
SSS YYY SSS LLL 000 000 AAA AAA 
SSSSSSSSSSSS YYY SSSSSSSSSSSS LLELLLLLLLLLLLLL 000000000 AAA AAR 
SSSSSSSSSSSS vYY SSSSSSSSSSSS LELLLLLLLLLLLLL 000000000 AAA AAA 
SSSSSSSSSSSS yyy SSSSSSSSSSSS LLLLLLLLLLLLLLL 000000000 AAA AAA 
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MCHECK790 == VENUS MACHIN HECK -SEP- :01: = 
vet . 1ersEb 1980 Sifaise PANCVAS Races MOe OO mars a) 


13-SEP-1984 
- TITLE nce ce rae ~~ VENUS MACHINE CHECK 
- IDENT 


PARAAAAAAAAAAAAALAALALL ALLELES ESSE LEST ERE SESE REESE ESET EE EE CSCC e acc eee aera) 


sti As) 1978, 1980, 1982, 1984 BY 
DIGITA UIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
LL RIGHTS. RESERVED. 


IS SOFTWARE IS nia UNDER A LICENSE AND MAY BE USED AND sores 
Y IN oe WITH THE TERMS OF SUCH LICENSE AND WITH THE 
tt te OF THE ABOVE gtd NOTICE. THIS SOFTWARE OR ANY OTHER 
E 


3AoOZzZ2zr 


® 
® 
® 
Ww 
® 
® 
t a 
* 

PIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
HER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
RANSFERRED. * 
SI 

HE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
® 

® 

® 

® 

® 

*® 

* 

* 


ND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 
CORPORATION. 


DIGITAL ASSUMES NO RESPONSIBI 
SOFTWARE ON EQUIPMENT WHICH I 


SOOQoOQooQooQooooQoooooooo 


OOQooooooooooooooooo 


>= +OO-0oO-7 PF 


ITY FOR THE USE OR ne OF ITS 


LITY 
S NOT SUPPLIED BY DIGITAL 


:* 
:* 
:* 
:* 
:* 
:* 
:* 
-* 
-* 
:* 
-* 
:* 
:* 
-* 
:* 
:* 
°® 
** 
-* 
® 


; 
° 
; 
e 
e 
° 
e 
° 
e 
° 
e 
° 
e 
° 
° 
4 
° 
° 
e 
° 
e 
; LARRRRARARARASALASALALALESESELE LESS AS SEES EERE AREAS EES EEE R RRR SEER ERE S RSS SY 
: 


"FACILITY: SYSLOA790 = Loadable CPU-dependent code 
ABSTRACT 


This module contains routines to handle VAX 11/790 specific 
machine check errors. 


SOOQOCOCOOOOOOOOOoOoOoOoooOoOoOooOoOoOO 


MUMIA BB REE EES BWW iononononononononunn 2 2 


NOU WN @§ OOD NAME WIN 9 OO NAME WIN $$ O OONAU EWN $9 OONOAU SW OWONOU ES Wn 


SOOCOoooooooooooooooooooooooooooooooooo 


: ENVIRONMENT: 

; IPL = 31 Mode = KERNEL 

; AUTHOR: Wayne Cardoza CREATION DATE: 2-0ct-1982 

: MODIFIED BY: 

: v04-004 wmMc0020 Wayne Cardoza 13-Sep-1984 

; Make sure we never run with CRD interrupts disabled. 

: V04-003 wncoo19 Wayne Cardoza 12-Sep-1984 

: Fix position sree in CRD log. 

: v04-002 TCM0002 rudy C. Matthews 11-Sep-1984 
° : Make CONSKEEPALIVE’s reference to ERLSRELEASEMB absolute. 

: v04-001 wMC0018 Wayne Cardoza 05-Sep-1984 

3 Add MSTAT2 to the CRD log. 

; v03-023 wMc0017 Wayne Cardoza 23-Aug-1984 

: Fix a bad index mode. 


St 


~~ VENUS MACHINE CHECK 


0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
° 
0 


SOooooooooo 
COOOooQoooooooosoooooo 


COOQOOOCOCOSOOSOOSOOOOOOSOOOoOSoOoSooSo 
2 § §->GO0O90:30000000 OOOO OO 0000909 09 09 09 09 09 09 09 SI NINN NIAAA AAA AAAOUIN 


PW OODNAWNE AMO OD NA NE WIN HO OD NAN E WIN 9 OD NOAM EWN OOODNOU ES Wi" 000 


SSSSSSSSsSsssssssssssssssssssssssssssssssssss3s3ss 


SOSCCOSCOOCOOCOOOSOOSOOSOOOCOOOOOOSOOSOOSOSOSOOSOoOSoSO 


at se 4 4 


i=] 


ISSEP=1984 13:08:3¢ ESYSUGR.SRESAcHECK»90.maR:5 99° GF 


VO3-022 wMC0016 Wayne Cardoza 14-Aug-1984 
CP=-10 BUF doesn't always have a cycle type. 
v03-021 wMCc0015 Wayne Cardoza 06-Aug-1984 


And more changes. 


v03-020 TCM0001 veudy C. Matthews 31-Jul-1984 
Add routine CONSKEEPALIVE, which is called pertodically to 
determine if the VENUS console software is still functionin 
Algo. change the CRD interrupt vector from “X64 in the SCB 


V03-019 wMC0014 Wayne Cardoza 23-Jul-1984 
Still more spec changes. 

v03-018 wMC0013 Wayne Cardoza 12-Jul-1984 
Many spec changes. 

V03-017 wMc0012 Wayne Cardoza 15-May-1984 


Space always reserved for SBIA error word. 
Add PC=-PSL to log message. 


V03-016 wMC0011 Wayne Cardoza 30-Apr-1984 
Add ADPDEF. 

v03-015 wMC0010 Wayne Cardoza 16-Apr-1984 
Ignore CP timeouts on BRVVR. 

V03-014 RLRSBICONF Robert L. Rappaport 22-Mar-1984 


Test MMGS$GL_SBICONF errey elements for valid system 
virtual address (high bit set) before using. Also 
correct bug introduced by CONFREGL fix. 


v03-013 wac0009 Wayne Cardoza 10-Mar-1984 
Fix SBIA logging bugs. 


v03-012 KPLO100 Peter Lieberwirth 26-F eb-1984 
Use CONFREGL in Lieu of CONFREG. 


v03-011 wMCc0008 Wayne Cardoza 29-Jan-1983 
Clean up stack before bugcheck. 


v03-010 wMC0007 Wayne Cardoza 01-Dec-1983 
Turn CP-10-BUF into NXM for EXESMCHK_BUGCHK checks 
MBOX doesn't always latch cycle type. 


V03-009 wMC0006 Wayne Cardoza 20-Nov 1983 
Fix transposed Lines of code. 


v03-008 TMK0001 Todd M. Kat 14-Nov-1983 
Add a .TITLE so that the object file for this module 
wnet, be. saserted into SYSLOA.OLB as MCHECK790 instead of 
as. 7" 


v03-007 


wac0005 Wayne Cardoza 02-Nov-1983 
Fix IOCSBROADCAST calls. 
Get adaptor type from ABUS_TYPE. 
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MCHECK790 “= VENUS MACHINE CHECK 16-SEP-1984 01:01: AX/VMS Macro V04- Pa 3 
vet 1$-SE b=} 382 01:0) 32 YOYSLOA. SRETSICNECKSS0.MAR: 5 ~ (1) 
115 ; 
118 ; v03=-006 KDM0053 Kathleen D. Morse 11-Jul-1983 
117; Replace cpu-specific IPR references with the cpu-specific 
18 : symbols, defined by SPR790DEF. 
1 p : V03-005 wMC0004 Wayne Cardoza 06-Apr-1983 
! : Changes to bad page handling. 
1 : : V03-004 wMc0003 Wayne Cardoza 22-Mar-1983 
! ¢ : Misc minor fixes. 
00 1 $ : v03-003 wMc0002 Wayne Cardoza 22-Feb-1983 
1 3 Resource removed from service bit. 
898 ! 8 ‘ Spec changes in MSTAT1, MSTAT2, MDECC. 
000 130; v03-002 wMc0001 Wayne Cardoza 10-Feb-1983 
44 : 1; Add error logging routine for adapters. 
0000 138 i-- 


< 
eo 


Declarations 15-SE SYSLOA.SRCIMCHE 
; -SBTTL Declarations 
> INCLUDE FILES: 


epecrrve “= VENUS MACHINE CHECK 1 mists 9 01:01:38 Yeeves Macro Meek o90. MAR: 5 Page 4 


: INCLUDED SYSTEM SYMBOL DEFINITIONS 


SADPDEF 
SEMBDEF <MC,SE> 
SIPL 


OOooooooooooooo°ooo 


> OWN STORAGE: 


0000 -PSECT MCHKSDATA,QUAD,WRT 


EXESMCHK_ERRCNT:: 


Used to locate error counters 
via SYS.MAP. 


SoOOoCOoCOSOOSOOOSOOOOSOOOOOOOCOOOOOOOOoO 


o 
fe eee) ee ew ew ola lo alot ololelelololelolelelolololara! 


IBOX_OLD1: Time of most recent IBOX error 


00000000 0000 .LON 0 
0004 IBOX_OLD2: ; Second most recent 
00000000 0004 0 


. LON 
IBOX_TOTAL : 


a ek ee ae ad a od od = = = = od = od 8) = od od = 8 SS = = SS = 2 2 8 8 


5000009090909 09 00 09 0009 SIN NIN NNN SDD DDD OOO ITT Be BS BE PW 
=O OD NA NEW 9 OOO NAME WIN OOO NAME WWI OS OOO NA E WI O OONIOU EW OOONOUM 


0008 ; Total errors 
00000000 0008 .LON ae 
QO00000A 000C IBOX_THRESHOLD = 10 ; Minimum time allowed for 3 IBOX errors 
Bot ; (10 millisec units) 
Oe FBOX_OLD1: ; Time of most recent FBOX error 
00000000 000 LONG 0 
01 FBOX_OLD2: ; Second most recent 
00000000 001 . 0 
14 FBOX_TOTAL: ; Total errors 
00000000 14 . : 
0000000A 1 FBOX_THRESHOLD = 10 ; Minimum time allowed for 3 FBOX errors 
: ; (10 millisec units) 
1 EBOX_OLD1: ; Time of most recent EBOX error 
00000000 1 0 
1¢ EBOX_OLD2: ; Second most recent 


+ i 9 fig == VENUS MACHINE CHECK 19~$60= 1388 91:01:32 AX/VMS Macro V 


04- Pa 
A YSLOR. SRETAICMECKIOO.MAR:5 O° (3) 


Declarations 
00000000 1 133 «LONG 0 
90000000 195 (OOxatOTN NG eee te 
80000808 2 136 EBOX_THRESHOLD = 10 : Figtam tise atvouse for 3 EBOX errors 
; m sec units 
4 19 
00000000 2 199 igigs 0 Hy ony Sa v7 ead tee error 
: 3 of most recen rror 
00000000 9058 a ~"*="LONG 0 ae ooty 
00 09 C § nee teint Yo 0 ; Total errors 
§o000003 09 6 Og MBOX_FE_ THRESHOLD = 2 ; aga tine alongs for 2 MBOX errors 
3 m sec units 
90000000 bop 38 MOOK _FE PHY AOR: ; Physical address of Last MBOX address PE 
. 3 error 
ae 
09 4 3 TB_OLD1: ; Time of Last TB parity error. 
00000000 oae 10 -LONG 0 
0038 11 TB_OLD2: ; Time of next-to-last TB error. 
00000000 0038 \¢ -LONG 0 
90000000 Opee 17 esctinhat ‘ 0 ; Total errors 
0000000A Bee8 316 TB_ THRESHOLD = 10 : pj Lovable Fise boquess TY errors 
3 Cin m second units). 
040 1 
$040 18 CSH_A_OLD1: ; Time of most recent A cache error 
00000000 0040 19 sb N 0 
0044 0 CSH_A_OLDe: : Second most recent 
00000000 ones § 1 -LON 0 
048 ¢ CSH_B_OLD1: ; Time of most recent B cache error 
00000000 0048 sh N 0 
004C 4 CSH_B_OLDe: ; Second most recent 
00000000 gpe 5 . 0 
90000000 oe $ CACHE_TOTAL: 0 ; Total errors 
0000000A 33 23 CACHE _ THRESHOLD = 10 : vietave tise ot louse for 3 cache errors 
3 m sec units 
54 0 
054 1 MBOX_1D_OLD1: ; Time of most recent MBOX 1D error 
00000000 0054 3 -LON 0 
p28 MBOX_1D_OLD2: ; Second most recent 
00000000 005 4 -LON 0 
00000000 bet 5 MBOX_1D_TOTAL: 0 ; Total errors 
0000000A 8 MBOX_1D_ THRESHOLD = 10 3 Orotave, Tine ol lousd for 3 MBOX 1D errors 
: m 
06 
bcp 40 CRD_OLD1: ; Time of most recent single bit error 
00000000 6 41 -LONG 0 
64 rk: CRD_OLD2: ; Second most recent 
00000000 64 4 -LONG 0 
9 00 98 rf: CRO TOTM: . ; Total errors 
So00bb. 6c $6 CRD_THRESHOLD = %o0 ; Minimum time allowed for 3 CRD errors 
Bee rf 4 : (10 millisec units) 


MCHECK790 
04004 
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Declarations 

0000012¢ 
0000012C 
00000080 
0000005A 
0000005A 

0B4 
00000000 0084 


49 ¢ 
Li 
. 


D 13 


16-SEP=1 
1$-8Ep-| 


ENAB_TIME = 5 * 60 


MER: 
- LONG 


EXESAB eee 


KE 
K 
T 


EPAL 
EEPAL 


ODR VALU 


CRD_REENAB_TIME 


64 


vert vite = 99 


CONG. 
ol ON NG 


Ft EEPALIVE _TIME 
0 


Bho Pitasse Levey OS eaesechetKoG0.man:s 2% (8, 


; 5 minute CRD disable time 


; Time left to reenable CRD's 


Memory error counters for adapter routines 
One for each TR on each of 4 SBIA's 


1 1/2 minute console keepalive check 
Time left to check if console is alive 


; Check if console is updating this 
; register 


MCHI 
V 
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Declarations 15-SEP-1 SYSLOA.SRCJ RCH MeeK 990. MAR; 5 


gi ; This is a table 2 maps one bit for each qecode in the VAX 


8 4: instruction set. the corresponding b ss fe that opcode 
B 5 ; does onty one read and may be safely restarted a CP_IO BUF error occurs. 
8 § 3; The table does nae take into account reads qane fon address calculations. 
8 2 ; These are assumed to net be resevent in deciding if 1/0 space was referenced. 
gi ; Queue, decimal, and string abearune? ons are not assumed to be safe. 
29 ég1 INST: 

343F 7 WORD aBO01 19190001 TTT HALT wore REI,RET,PROBER/W 

FEF QOBA  ¢7¢ WORD BUTTE ;BRANCHE 

B00 74 WORD “811910000 6 TE ‘BRW, CONVERTS ,MOVES 

F55 C 75 WORD +4 11111 0101 SFLOATI NG OPS 

9130 C 6 -WORD %*B0000000101001101 3 

F5 Bee 7 eWORD *B0111111101010101 3 

C14F 6 78 -WORD “B11 0008! 1001111 : 

D555 00C 79 ~WORD “B11 191 101 19191 sARITHMETIC BYTE 

DFFS Been 60 WORD %B1101111111110101 7CMPB,TSTB 

D555 O0CC 1 eWORD %*81101010101010101 ;ARITHMET IC WORD 

FFFS Beck S6 eWORD *81111111111110101 MPW,TSTW, BisPsw, BICPSW 

0555 00D0 8 «WORD *B81101010101010101 :ARITHMET re LONG 

FFF5 QO0D2 84 eWORD *B81111111111110101 7 CMPL 

CFFF O0D4 85 «WORD %*B81100111111111111 BBS, “bat, BLBS, BLBC,CMPV,CMPZV 

OCFD O0D6 286 eWORD %*B0000110011111101 TAOB, CV 


+ ind 9S fi =~ VENUS MACHINE CHECK Ay 1978 $ o- 1882 91:0): 38 AX/VMS Macro 


Pa 
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D : 
; LOCAL VARIABLES FOR MACHINE CHECK HANDLER 
D 6 
D 92 ABUS_CYCLE: it mask for ABUS related cy cles 
08088000 008 $9 “LONG 1@MCF790SC_ABUS + 1aMCF7O0SC ABUS WRT + TaMCFTOOSE AGUS REFL 
43 38 ASSUME MCF790$V_ABORTS EQ 1 : pene Ry ot there is room for software 
; abor 
00000001 +3 97 MCHK_ABORT = 1 ; Used by machine check handler to abort 
dC ABORT_BITS: ; Local copy of abort bits 
00000000 4 "LONG 0 acetates a 
OE SBIA_ERR_SUM: 3; Temp c of SBIA summary register 
00000000 906) $08 = LONG 0 ashes ge a 
000000C¢8 E4 5 CRD_LOG SIZE = <2 * 4> + <16 * 3 * &> ; Buffer siz 
E4 § CRD_BUFFER: > Single bit. error logging buffer 
000000C4 E4 0 LONG 4 + <16*3#4> ; size of buffer 
Bees 08 CRD_ FLAGS: ; Flags - 1 => Logging turned off 
00000000 O0E 09 0 
Bpee 10 CRD_FIRST_ENTRY: ; Beginning of error entries 
OOOOO1AC OOEC 11 -BLKL 16% 3 ; Room for 16 entries 
Bie \§ CRD_BUF _END: 
O1AC 14 CRD_NEXT: ; Next CRD slot to be used 
00000000 O1AC $12 -LONG 0 
01B0 16 


+ 4 


S=SEb=13R 5:28:38 PESUOR.SRESAcHECK?90.man:5 "2% (3) 
EM_W_CACHEOFF, half of cache turned off due to errors\- 


SEETSTENM_FOOROFE FBOX turned off due to errors\- 


t 4 
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RO AO 
o- on 
La) -vVv -Vv 
- tA tA 
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e oO 
ny _ - ed fe - 
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<< - o* Jae - 
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vest Declarations 1$-865218 4 Pa tae SYS LOA. SAE IRCHECKS90.MAR:S 


0000 ) ~PSECT MCHKSCODE ,QUAD,RD,WRT 
: 


Page 10 
ee 


x 
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) V 
.SBTTL Machine check entry point 


ae 
MCHECK790 == VENUS MACHINE CHECK 


FUNCTIONAL DESCRIPTION: 
ALL machine checks are vectored to this entry point. 


FORMAT OF VENUS'S MACHINE CHECK LOGOUT STACK: 
On entry to this machine check handler, the stack is set up as follows: 


OO(SP): # bytes in machine check log on stack 


machine check frame (see MCF790DEF) 


ween anne nn e- en n---------------- + : (SP) 


wer er ee nace ene ee we merece een er secre oa $ 


inanitnigtemumenbarmttiseenammmubiiaiiaegamenedls 
# bytes pushed on logout stack: :(AP) 


frame 


AP will point to the beginning of the machine check log on the stack. 

2 lLongwords are immediately pushed on kee of the machine check log, and 
are referenced as negative offsets from AP. These two longwords are 
input arguments to EXESMCHK_BUGCHK, a routine that is called to check 
for a user-declared machine check recovery block. This routine is 
called immediately before pygcneck ing. and expects the mask and the 
peiater Be oe exception PC/PSL to be right on top of the machine check 
og on the stack. 


DNAS WIN = OOO NAME WIN OOO NOAOU ES WN @ OOD NAME WW O ODOM ES WH O OONO 


SOOOoOooooooooooooooooooooooosooooooooooooooooooo 
©O.0909.09 09 6909 C9 G9 SI SII DS DSO DODD TTI BB BB BEE EPA 


SOOCOOCOOOCOoOooooooCooooooooooooooooooooo 


MCHECK790 == VENUS MACHINE CHECK 16-SEP-1984 01:32 AX/VMS Ma v04- P 
yOeeb04 Machine check entry point 19-86 =] 98e ee SYSLOA. SAE IAICHECK?90.MAR; 5 er t) 
90 »ALIGN LONG 
91 EXESMCHK:: 3; Machine check handler. 
DD 35 PUSHL #MCHKSM_MCK ! MCHKSM_LOG ; Mask signals machine check. 
$0 AE OF 9 PUSHAL Ose eye PC+4(SP) 3 Push pointer to exception PC/PSL. 
107F fi 88 94 PUSHR #*M<RO,RT,R2,R3,R4,R5,R6,AP> ; Working registers. 
sc. OSE CBC 99 ADDL3 #<10#43,SP,AP ; AP points to mchk log frame. 
: Do misc initialization 
9 e 
cB 00 BICL3 #*C<MCF790S$M_ABORTS ! = ; Get all the hardware abort bits 
6 1 MCF 790$M-AUTO_SHUT>,- 
OODC CF OC AC FFFDFFE1 8F ¢ MCF790$L_EBCS (AP) W*ABORT_BITS 
04 AC 94 ! ? CLRB MCF79 $B-MCHK_CODE (AP) ; Just in case 
1 B2 : Look for one of the four basic error types 
: 8 3; BUGCHECK if we find two 
: 83 : MBOX fatal errors 
04 OC AC OF 4 1 . BBC #MCF790SV_MBOX_FE, MCF790$L_EBCS(AP), 10$ 
04 aC 04 90 MOVB § #MCF790$C“MBOX-FE, MCF790$B-MCHK_CODE (AP) 
: FBOX errors 
0904 aC 1C €1 10$: BBC #MCF790$V_FBOX, MCF790SL_EHSR(AP), 20$ 
04 aC 93 stp NCP 790$B_ACHK_CODE (AP) 7 Make sure this is the first match 
04 AC 01 90 MOVB #MCF790$C_FBOX, MCF 790$B_MCHK_CODE (AP) 


OC AC 00001E00 8F D3 
MCF790$M_ECS_PE ! MCF790SM_EMCR_PE, - 
MCF790$L_~EBCS (AP) 


09 = 3=«13 BEQL 
04 AC 95 TSTB MCF790$B_MCHK_CODE(AP) ; Make sure this is the first match 
1 _ BNEQ BAD Bene 
04 AC 2 90 MOVB #MCF790$C_EBOX, MCF790$B_MCHK_CODE (AP) 


: IBOX errors 


$0$: BBC #MCF790$V_IBOX_ERR, MCF790S$L_EBCS(AP), 40$ 
TSTB MCF790$B_ACHK_CODE(AP) ; Make sure this is the first match 


BA 
MOVB #MCF790$C_IBOX, MCF790$B_MCHK_CODE (AP) 
: Call appropriate service routine 


dos: CASE MCF790$B_MCHK CODE(AP),- ; Use machine check code 
<CHECK_MBOX_15,- 


09 0C AC OD 3 
04 A ; 


1 
5 
04 aC 03 6 


; Nothing so far 
; FBOX error 
; EBOX error 
; 1BOX error 
; MBOX fatal error 


ROA AIAN AAS SS BD 11101 FO DS SP SNMNMPNNIMOOLL LS LSOWWWIIIWVoommovcVvc7co 


Pee ee ee ee ee eo ee tt ot ree 


10 
1 

18 

14 

15 

16 

17 

18 

19 . 

y ; EBOX errors 
: 20$:  BITL #MCF790SM_EDP_PE ! MCF790$M_USTK_PE !- 
4 

§ 

6 

7 

8 

9 

0 

4 

40 

4} 

ig 

4 

45 

46 


DAPI & & & 


; fall thru to ba 
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Always bugcheck - may be bug in this handler 


447 
44 
44 
4 BAD_MCHK: 
0503 30 4 BSBW LOG_MCHECK ; log it 
23 2 § ; BUG W CHECK BADMCKCOD, FATAL 
saat 30 83 454 M_ERR: BSBW MBOX_FE_ SERV ; MBOX_FE service routine 
ae 5 bee t2? ; BRB CHECR_MBOX_1D 
0238 30 : 23 F_LERR: BSBW F BOX ; FBOX service routine 
08 = 11 i $28 ‘ BRB CRE SABOX. 1D 
0271 30 0073 460 E_ERR: BSBW  EBOX ; EBOX service routine 
03 = =11 0078 72) BRB EHECRS SABOX.. 1D 
O08F 30 85 188 ERR: BSBW IBOX_SER ; IBOX service routine 
Boog tee : ; BRB CHECR SABOX. 1D 
Baee 188 : : fall thru to next stage of checking 
S076 468 MBOX 1D interrupt indicated by MBOX_INTR without MBOX_FE 
bog $93 3 ; TB problems are hard to spot - just check for the bits 
0078 471 CHECK _MBOX_1D: 
17 OC AC OF EO 0078 rh Bas #MCF790$V mY FE wets; 8 etd MCHK EXIT 
38 AC OO0000F00 8F »D3 boas 47 BITL AACE 908H—1 TAG PE [MM OSM AP 
008 474 MCF 1B “B_PE ! mcr 79OSm, 18. 7 tie “PE, - 
at 475 MCF 790$L MASTATT (AP) 
05 12 B28 476 BNEQ 10$ B pcee 
08 OC AC 4 E1 O8A 477 BBC #MCF790$V_MBOX_INT, mce70$L. EB ceetem MCHK_EXIT 
00 04 AC 0 G6 4444 478 10$: BBSS #MCF790$V V"MBOX_ “1D, MCF790$B _ACHK_ CODE (AP), 20$ 
039A 0 B38 44 20$: BSBW MBOX_1D_SERV 
0097 481 ; fall thru to common wate processing 
097 rt : 
94 483 MCHK_EXIT: 
04 AC 95 097 484 TSTB MCF 790$B_MCHK_CODE (AP) 
C6 13 QO9A 485 BEQL BAD_MCHK : We + * eal t figure it out 
0599 «30 bor $88 BSBW LOG_MCHECK 3; Log i 
$4 188 ; If any abort bits are set, we cannot resume the instruction 
OODC'CF oD 9F 490 ° TSTL W*ABORT _BITS 
1 A® 491 BNEQ REFLECT MCHK 
107F 8F BA Bae £36 POPR o ony’ a RD, R3,R4,R5,R6,AP> 
5E 8 co Ao 49 ADDL acest ; Get rid of recovery block check data 
5E —E CO QOAC 494 ADDL a e : Get rid of the machine chack frame 
0000004A BF 00 DA OOAF 495 MTIPR # rapk 90$_EHSR : Clear the VMS entered flag 
2 6 496 REI 3; At last - continue 
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ef -SBTTL Reflect machine check to user 


REFLECT MACHINE CHECK TO USER 


@o 
~ 


This code is entered if the machine check was fatal. It determines 
; if it was just fatal to the process which caused it (current process 
is in USER or SUPER mode), or if it was fatal to the entire system 

(current process is in EXEC or KERNEL mode). 


If current process is in USER or SUPER mode, 

set up an exception on user's stack and REI to it 
If current process is in EXEC or KERNEL mode, 

issue a fatal bugcheck. 


R 


49 
49 
0 
1 
By 88 
B7 4 
B7 5 
bey 809 
8) 
087 5 
B7 10 
087 11 
087 \§ CALLING SEQUENCE: 
p87 1 BRB/W -- NOTHING EXTRA CAN BE ON THE STACK!! 
poet 15 ; STACK CONTENTS: 
087 1g eeteas! re RO,R1,R2,R3,R4,R5,R6,AP 
0087 1 O(SP) Longword inputs for recovery block check 
Boe) 218 28(SP): (also AP) machine check log -=- Ist longword is a byte count. 
00B7 520 REFLECT_MCHK: ; Reflect exception according 
0087 521 ; to current access mode. 
03 60 AC 19 €0 0087 5 § BBS opel ey CURMOD+1, - ; Branch if USER or SUPER. 
oopc = 5 MCF79OSL_PSL(APS,10$ —; 
0036 «31 BpeE : : BRW BUGCHECK_NOLOG ; EXEC or KERNEL; bugcheck. 
Boer 526 10$: ; SUPER or USER; exception. 
0 00 oB OOBF 527 MFPR #PRS$_KSP,RO ; Get kernel stack pointer. 
70 SC AC 7D OOC2 528 mMOvVa MCF790$L_PC(AP).-(RO)  ; Push PC,PSL on kernel stack. 
00 50 DA O0C6 529 MTPR ' 3; Replace new kernel stack ptr. 
107F 8F BA 00C9 530 POPR #*M<RO,R1,R2,R3,R4,R5,R6,AP> ; Restore registers. 
5E 08 CO OO0CD 531 ADDL #<2%4>,SP ; Pop inputs for recovery block check. 
SE BE Ss 000 33¢ ADDL  (SP)+,SP : Pop mchk log from stack. 
00D 534 ; Set up an exception stack for current process. 
00D 2 5 ; The faulting PC,PSL pair are still on the interrupt stack. Alter 
it 2 $ 3 them to look as if an exception has occurred. 
6E 00000000 ' GF 9E $6p3 = MOVAB G“EXESMCHECK, (SP) 3; Replace exception PC. 
04 AE 04 AE O02 18 EF OODA 9 EXTZV #PSL$V_CURMOD, - : Zero exception PSL, except 
00E1 40 #PSL$S_CURMOD, - :; for current access mode. 
Beet 2! 4(SP) ,4(SP) 
04 AE O04 AE 16 9C €1 4g ROTL #PSLS$V_PRVMOD, - ; Create a PSL of current mode 
OOE7 54 4(SP) ,4(SP) ; kernel, correct previous 
0E7 44 ; mode, and IPL 0. 
0000004A 8F 00 DA QO0E7 45 MTPR #0, #PR790$_EHSR ; Clear ‘VMS entered’ flag. 
02 OOEE 46 REI 3 Go to exception handler. 


MCHECK790 
04004 
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~- VENUS MACHINE CHECK 16-SEP-1984 01:01: AX/VMS Macro V04- 
18 SEp-198¢ 90bi 82 gYSLOA. SREIMCHECKT90..MAR; 5 (9) 


Bugchec 


a -SBTTL Bugcheck 
If user has declared a recovery block, transfer control to it. 
Else issue a fatal bugcheck. 


CALLING SEQUENCE: 
BRB/W -- NOTHING EXTRA CAN BE ON THE STACK!!! 


7 
EF 4 
fF 308 
EF 0 
EE 88s 
EF : 
FF 888 
SEF 36 STACK CONTENTS ON ENTRY: 
OEF 5 (SP): saved RO,R1,R2,R3,R4,R5,R6,AP 
OEF 28 (SP): H Longword inputs for recovery block check 
per 23 ; (SP): (also AP) machine check log 
OEF » 561 BUGCHECK_POP: 
5E 04 0 OEE $6 weoen #4,SP ; Clean off garbage on stack 
0543 30 Gor $64 BSBW  — LOG_MCHECK i Log it 
OOF 65 BUGCHECK_NOLOG: ; Entry point if already logged 
107F 8F BA oor 8 296 PoPR #*M<RO,R1,R2,R3,R4,R5,R6,AP> ; Restore registers. 
OOF9 568: A fatal bugcheck is now inevitable unless a user has declared a machine 
oer 299 3 check recovery block. 
i ee 
O000004A 8F 00 DA OO0F9 276 MTPR #0, #PR790$_EHSR : clear ‘VMS entered’ fla 
00000000°GF 16 0100 $7 JSB__G*EXESMCHK~BUGCHK i Hh reture, we recovery Bleck. 
0106 574 BUG_C oa ; Issue fatal bugcheck. 
0106 575 MACHINECHK,FATAL 
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V04-004 IB0OX errors 18-8 sets et Be SYSLOA.SRC SAcHeCK 90. MAR; 5 . (10) 
! : a4 4 -SBTTL IBOX errors 
10A 8 : An IBOX error has been detected. 
10A 0 ; These are all treated al 
} - ; This is cause for a bugcheck if they are too frequent. 
10A : 
10A 4 IBOX_SERV: 
O8'CF D6 O10A 5 INCL W*IBOY TOTAL ; Count the err 
1B OD 1 f § MOPR #PR790$_TODR,RO ; Current ties = - "10 millisec units 
52. 50 O004'CF C3 01 SUBL3 W*IBOX OLD2,R0,R2 : Time for three errors 
0 : bt 17 8 CHP R #1B0Xx pata : Too quick 
FFDO §3=631 «011C = 590 BRW BUGCHE : Clean off return address before BUGCHECK 
0004'CF 0000° CF dO 1i1F 91 10$ MOVL wW* 1BOx spo ® Scns _OLD2° ; Save new times 
O000'CF 50 »dO 3156 3 MOVL RO,W*1B0x_ 
05 12B 9 RSB 
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MCHECK790 =- VENUS MACHINE CHECK 16-SEP-1984 01:01:32 VAX/VMS Macro V04- P 16 
V04-004 MBOX fatal errors 1 met 01:08:32 SYSLOA. SAE IACHECKT90.MAR: S — (11) 
12C 95 -SBTTL MBOX fatal errors 
12C 88 p++ 
12C 97 ; A MBOX a error (FE set) has been detected. 
: : 38 : Error handling depends on the exact error which occurred. 
1ec 6 p ‘ 
12C 601 MBOX_FE_SERV: 
! : ? ; -ENABL LSB 
002C CF D6 : 3 604 : INCL W*MBOX_FE_TOTAL ; Count the error 
} 606 3 First make sure we have a single error, otherwise give up 
38 3C AC (07~«CO#EO 608 ‘ BBS #MCF790$V_MUL_ERR, MCF790SL_MSTAT2(AP) ,35$ 
0 : a19 ; Check for cache tag parity errors with the written bit set 
05 3C AC 04 €1 $1 5 216 F BBC #MCF790$V_CSH_W, = 3; cache not written 
013A 61 MCF 790$L_MSTAT2(AP) , 30$ 
31 3C AC 06 «£0 O13A 614 BBS #MCF790$0_CSH_TAG PE, = ; parity error 
O13F 615 MCF 790$L_MSTAT2(AP) , 35$ 
013F 617; Was it a write to nonexistent memory. 
Bist 218 ‘ A repeated error is fatal. 
Bie e Y : R3 must remain cycle type from this point on 
53 38 AC 04 1A EF O138F 6 é $0$:  EXTZV. - #MCF790$V_CYCLE_TYP, - 
0145 6 #MCF790$S_ CYCLE TYP, - 
0145 624 MCF790$L_ASTATITAP) ,R3 3 get cycle type 
29 3¢ AC 03 «©€1 «20145 )~— 625 BBC #MCF790$9_NXM, - 3 not NXM 
014A 626 MCF790$L_MSTAT2(AP) ,40$ 
FC AC 04 CB O14A 627 BISL #MCHKSM REXM,-4(AP ; Add NXM to recovery mask - 
OO28°CF SC AC Di O14E 628 CMPL MCF790$C_PC(AP), W*MBOX_FE_PC ; same PC for two errors 
1A «130154 $63 BEQL 35$ es - bugcheck . 
50 1B 08 0156 630 MFPR #PR790$_TODR,RO urrent time - 10 millisec units 
52 50 0024'CF C3 0159 631 SUBL3. W*MBOX_FE_OLD,RO,R2 ; Time since last error 
02. 52 D1 015F 63¢ CMPL Re #MBOX"FE_ THRESHOLD 
OC oF O162 6 BLSSU § ; Too quick - bugcheck 
024'CF 50 DO 0164 634 MOVL RO,W“MBOX_FE_OLD ; Save time of this error 
0028'CF SC AC DO 0169 635 MOVL MCF790$L_PC(AP), W*MBOX_FE_PC =: and the PC 
eR | 
rF7c OCS big ° 8 35$: BRW BUGCHECK_POP ; Clean off return address 
017 640 : Was it an error on instruction access to 1/0 space 
17 641 ; We can try to recover if it never made it out to the SBI 
17 yet 3 This code will need work if SB! memory is ever supported. It will not have 
1 oh ; physical addresses in the same range as its SBI. 
17 645 : R3 = CYCLE TYPE 
03 3C AC O02 €0 Q17 ges hos: BBS #MCF790$V_CP 19 BUF, - 3; Check for the error bit 
4 968 MEF 27OSL_ASTAT TAP) ,45$ 
010D_~=s «31 17 64 BRW 1 . : 
50 38 AC O02 16 €EF Q17B 650 45$: EXTZV #MCF790$V_DEST_CP, - ; code for port being serviced 
181 651 #MCF790$S_DEST_CP, - 


MCHECK790 
v04-004 


51 Q000'CF 
9D 08 Al 


4E 08 Al 
0D 


ww SS SF OMI FH FW" OO 
TW WwW NO NOMOO—"PMoOnMNTO 


38 34 Al OC 
50 00000000'GF 


F 
0000'8F OE of 


54 3 
52. 44 A044) O09 


24 AC Ge 
52 6 

5C AC 52 
06 
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Oo 
A) 
nr 


nN—OMONOMoOmMoo—ol0- 0d 
ON] NOOO -D fF OOOO 


50$: BEQL 


PAXEXPREXRAPEASEAAAEAAAAAAAAA AAA AOSOH SHA AA OA OO OOOO 
60.00 09 09 09 09 09 09 09 00 09 SIN NINN NS NSP AAA AAO 
OOO NAOU EWR 0 OWDNAUE WN OOONO UE WD OWOONOUS 


oo-a-om 
-—OoON—-Wwo— 


#3,R4 : 
63¢ 51$: ADDL3 #9, ADP$L_UBASCB(RO)[R4],R2 


SOOOCOOCOCOCOOCOCOOCCOCOC COO OCOCOOOOOCOOOOCOCOCOOCOOOOOCOOOOGDOOOCOOOOOOOSOOOOO -« 


QOCCO RN NH WNW HHH HHH HMMMOOOVVTOTVTVTVTVVVOMNOONCOWWW\YS YS F OOOO WMOMWMwmo 
DNMVIODOMOOOOOOOOOOAW@ ONI F999 9790 DW OOWUIWMWOMWUNVo & NN FE OVPUM AW > On 


-—-9o Oof-o 
Mm— hor 


16-SEP-19 
1$-3E5218 SYSLOA. SRETACMECKS90.MAR: 5 (11) v04 
MOVL OEE OORT THASAV CAPD R . it will b 
; assume o- t 
CHP RO, ANCE 7908C_OP_ PORT : 23 who ees 
; Op-por most co nm cas 
ROVE —ACF7908L, ESASAV(APD RI $ assume {t will be facn 
CHPE R gic 90$C_EBOXx_PORT a 
MOVL MCF790$L_VIBASAV(AP) ,R1 : IBUF (very unlikely) | 
468: MOVL § G°MMG$GL~SPTBASE,RO : SPT base 
BBSC #31,R1,47$ ; clear the system space bit 
MFPR #Pr$ pOBR,RO 3; assume PO space 
Bec, 30, MATS gm be 
: Py e 
47$: oo woac lee RO 3 pa e number in right space 
EXTZV $5225 a'r RO : IOA number (25-26 in PA) 
CMPB = W*ABUS_TYPECROJ,#1 
BNEQ 35$ 3; not SBIA 


INSV RO, #MCF790$V_AB_ADPT,- ; relative IOA number 
#mCF790$S_AB_ADPT ; needed for error logging 


MCF 790$L_MSTAT1 (AP) 
MOVL W*ABUS_VACROJ,R1 ; base address of SBIA 
BBC #SBIASV_BEL, - : error if error lock not set 
SBIASL_SUMRY(R1),35$ 

#SBIASO_CAE, - 
SBIASL_SUMRY(R1),70$ 
CMPB R3, #MCF790$C_CP_WRT ; all other reads bad 
BEQL 60$ ; go check for OK write errors 


Check for read of BRRVR register in UBA. If this machine check 

is the result of a BRRVR read, then just REI. Someone will either loose 
a character from a terminal, or a device timeout will result. This is 
better than a system crash. 


; CAE = didn't make it to SBI 
BBC #SBIASV_CTO,SBIASL_SBIERR(R1),55$ ; not a timeout 
MOVL G*IOCSGC_ADPLIST,RO : point to ADP List 

; done if nothing left on List 
CMPW ADPSW_ADPTYPE(RO).#AT$_UBA ; is this ADP for a UBA? 
BNEQ 53$ 3; no, look at rest of List 

look at VA's of all 4 BRRVR registers 
; calculate address of BRRVR from 
3 the SCB vector address saved in ADP 


; eee NOTE eeee The previous instruction assumes the syrvensty wees coding 
; sequence for dispatc R. An 

; changes to that code my affect this routine. The assumptions are that the 
; virtual address of the UBA BRRVR register is at an offset of 10. bytes past 
; se sonar rues vector address (9 is added to the SCB vector value because 

; the vector 

; stack), that the PC of the instruction ocgeas ing BRRVR is 5 bytes past the 
; interrupt vector entry, and that R4 and R 


ing UBA interrupts in the module INIADP. 


as bit 0 set to indicate handling the interrupt on the interrupt 
have been pushed onto the stack. 
CMPL (R2) ,MCF790$L_IVASAV(AP) ; same va as in machine check stack? 
SUBL #<9-3>,R2 : 
CMPL Fg CF TPO PC LHP 


; branch if not BRRVR reference 

; else back up to PC of instruction 

; in UB interrupt service that reads BRRVR 
3 does it match PC in MCHECK stack? 

; if so, came from UB interrupt service. 
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yoe~004 MBOX fatal errors 1$-3E = 1 382 Pa aa OTL OA. RETACMECKS90.MAR:5 - (11) 
O028'°CF 04 B 709 CLRL W*MBOX_FE_PC ; matching PC doesn't justify bugcheck 
SOT 88RP 398 BRB . S go finish u septs Arata 
254 «FS 1) eee ab : $: SOBGEQ R4,51$ : loop through all 4 
50 04 A0 06 16 ar g: MOVL ADPSL_LINK(RO) RO : follow ADP List to end 
63 11 14 oe 55$: BRB 120$ ; full log & bugcheck (abort first) 
08 Al 00600000 8F D3 iC c18 608: BITL #SBIASM_ADP ! SBIASM_RCP, - ; ADP or RCP also didn't reach SBI 
— 4 4 ee SBIASL_SUMRY(R1) 
04 AC 40 BF 88 6 a 70$: B1SB #MCF790$M_SBIA_ERR, - ; add SBIA error summary 
B 720 MCF 790$B_ACHK FODE (AP) 
OOEO' CF 68 Al 0D B 721 MOVL SBIASL_SOMRY(R1),W*SBIA_ERR_SUM ; save the error summary 
08 Al 8 Al C 1 7 ¢ BISL SBIASL~SUMRY(R1).SBIASL~SUMRY(R1) ; clear all the error Locks 
34 Al 00001000 &F C Moet ISL #SBIASA_C SBIASL SBIERR(R1) 3; and the CPU timeout bit 
36 f 9A 724 MOVZBL a@MCF790SL_PC(AP) RZ 3; get the guilt instruction 
01 00B8'CF Fo 4 725 $ R2,W*SBI_INST,90$ ; does instruction only do one read 
5 4 7 $ RSB 3 no - eventually abort 
OE 33 4 8 rts 4 i 90$: ae R3,#MCF790$C_CP_READ 3; read cycle? 
OODC'CF bg cf 8 rH f 3 aise #MCF790$M_10_RD,W*ABORT_BITS ; clear I0 read abort 
OODC'CF 04 CA 8 #4 4 1 100$: BICL #MCF790SM_MEM_WRT, W*ABORT_BITS ; clear write abort 
$3 738 : now make sure errors are not repeated 
OO28'CF SC AC D1 ; Sa 735 1108: = CMPL MCF790$L_PC (AP) ,W*MBOX_FE_PC ; same PC for two errors 
1A «13026 736 BEQL 115$ 3; yes - bupchec 
50 3=61B 08 026 737 MEPR #PR790$_TODR,RO ; Current time - 10 millisec units 
52. 50 O0026'CF C3 0265 738 SUBL3. W*MBOX FE_OLD,RO.R2 : Time since last error 
02. 52. 01 0268 739 CMPL Re #MBOX—FE_ THRESHOLD 
OC iF O26E 740 BLSSU._-:115$ 3 Too quick - bugcheck 
0024'cCF 50 »dO $44! 741 MOVL RO,W*MBOX_FE_OLD ; Save time of this error 
0028'CF 5C AC B0 He 4g MOVL MCF790$L_PC(AP), W°MBOX_FE_PC =: and the PC 
027C 744; 
FE70 3831 bs oe ot 115$:  BRW BUGCHECK_POP : Clean off return address 
FC AC 046 C8 $53 747 120$: BISL #MCHKSM_NEXM,-4 (AP) 3; Add NXM to recovery mask 
04 AC 20 = 888 83 748 BISB #MCF790$M_SBIA, - ; log full SBIA 
of 749 MCF 790$B_MCHK_CODE (AP) ; eventually abort (bit set) 
05 8 7 £39 RSB 3 and bugcheck (assume kernel mode) 
es P36 : Give up if there is no cycle type 
00 53 91 8 754 130$: CMPB  R3, #MCF790$C_NOP 
EF 13 : 135 BEQL =s«dW'1+58 
3 139 : if a cycle parameter RAM error, give up 
00C00000 8F v3 36 : BITL  #MCF790SM_CPR_PE_A ! MCF790$M_CPR_PE_B,- 
38 . 12 £60 BNEO Mee LPOSL ASTATI CAP) 
9 762 ;: 
97 86 ; Look for an error writing an MBOX register 
97 764; Se confused, so no recovery 
97 765 : R3 = CYCLE TYPE 
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MBOX fatal errors SYSLOA. BRET OCMECKT90.MAR:5 (11) 
97 766 . 
02 53 91 0297 767 1508: CMPB R3, #MCF790SC_WRITE_REG 
£0 13 029A 768 BeQL~=Séséds'1:8 : yes = bugcheck 
9C £68 
9¢ 67770 ; 
ot or) : Is it ABUS PE of some sort 
D3 3 718 r BITL wmce 7008M_ AB. DAT PE ! i 
38 AC 00300000 8F 90 775 MCF 790$L MASTRTI TAPS 
D6 s «12 ae 76 BNEQ 115$ ; ABUS so go bugcheck 
0 Ab £78 : This is an unknown error type 
8 ve 44 ; Either the hardware is very sick or this handler has a bug 
FDB9 31 02A6 34 i60s: BRW BAD_MCHK 
O2A9 ree 
02A9 78 -DSABL LSB 


Rs E 14 = - aa. a! mCh 
aa Ai ook errors I$-$Ep-196¢ 15:48:54 ESYSLOA.SRemchecKt90.man:s 8° «72, vo 


- if 5 a -SBTTL FBOX errors 
‘2 If : 3; An FBOX error has been detected 
A 3 ; These are all treated alik 
A9 789 ; This is cause for turning off the FBOX if they are too frequent 
n 8 ; A console message is printed if FBOX is turned off 
A9 73 FeOx_SERV: 
O14°CF D6 AQ «679 INCL pad TOTAL ; Count the error 
0 1B OD AD 794 MFPR #PR790$_TODR,RO : Current time - 10 millisec units 
52 50 O010°'CF C BO 795 SUBL3 W*FBOX_OLD2,R0,R2 ; Time for three errors 
OA 52 01 Bg £36 CMPL R2,#FBOX_THRESHOLD ; Too quick 
iF 1A 0089 7? BGTRU 108 : No 
28 OO A BB £8 MTPR #0,#PR790$_ACCS ; Turn FBOX off 
1 8 B 79 BISB #mMcF790$M_RSRC REM,- : Indicate resource removed 
04 AC C B80 MCF 790$B8 ACHK_CODE (AP) 
51 O1BO'CF 00 C 8 MOVL W*FBOX_MSG,R1 3; Mesage length 
52 O1B4'CF 9E O2C 4 MOVAB W*FBOX MSG+4,R2 ; Message address 
55 Q0000000'GF 9E 0O cf 0 MOVAB G*OPA$UCBO,R ; Send it to the console terminal 
00000000 ' GF ae 8 + Spe i38 G* LOCSBROADCAST 
0010'CF OOOC'CF dO 020k 806 10$ MOVL W*FBOX OLD1, W*FBOX_OLD2 ; Save new times 
CF 50 D0 O2E1 807 MOVL RO,W FBOX_OLD1 
05 O02E6 808 RSB 


+ in 9S fig =~ VENUS MACHINE CHECK es 19-3 P=1984 91:01:32 AX/VMS Macro V 


2 1 
EBOX errors ~3EP-1986 eyEv OS eResacMecK o0.mar:s om cf 


3) 


$. -SBTTL EBOX errors 
: An EBOX error has been Porectes 
; These are all treated alike 
his is cause for a bugcheck if they are too frequent. 


E7 10 
E7 1 
E7 1 
E7 1 
E7 14; 
E7 15 ;-- 
E7 1 
ef ! EBOX_ SERV: 
ef 18 ; First see if the error is a result of an MBOX problem 
05 OC AC +4 E1 E7 BBC once Tansy $vV_ oor ar fer rren. EBCS(AP), 10$ 
—E €0 EC BBS 7 ; It was the MBOX - don't blame EBOX 
21 of AC eS aaa 'tg VenCeeRD) "308 
98 "or D6 F 4 10$ INCL wceor TOTAL ; Count the error 
0 18 8 re 5 MFPR #PR790$_TODR,RO ; Current time - 10 millisec units 
52 50 OO1C'CF C€ f § SUBL3 voces OLD2 RO,R ; Time for three errors 
OA 3¢ D1 O2FE CMPL #EBOX_ THRESHOLD : Too quick 
0 TA 4 8 BGTRU 3; No 
FDE9 31 3 9 BRW BUGCHE : Clean off return address before BUGCHECK 
OO1C'CF 0018'CF DO 0306 0 208: MOVL W*EBOX Corl “W*EBOX _OLD2 ; Save new times 
0018'"CF 50 oY B 308 3 MOVL RO,W*EBOX_O 
05 0312 832 3C$: RSB 
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. 
| 
a ad -SBTTL Bad Data or Double Bit error | 


1 
1 : 
1 gi ; If possible a new copy of the page is paged in, 
1 : A double bit error will gause the physical page to be put on the bad page List 
1 33 | ; while a bad data error simply gets a new copy since it is not the array that 
: ; 1s at fault. 
1 a} Bap _MEM: | 
03 60 AC 1A 4 1 r{ BBC #P sy ss MCF790S$L -PSL(AP), 1$ 
FDD4 1 1 BRW BUGCH val : Interrupt stack = must give up 
02 60 aC 05 10 =«2EC 18 44 1$: CMPV #P ag oR 4 TPL 
1 845 nce 908L ’BSLEAPD *pipts ~ASTDEL ; Are we at a 2 non-pageable priority? 
4E 14 1 4 BGTR ort - recovery is usele 
50 SO AC F7 8F 78 ; 4 ASHL £5 MCF790SL MEAR(AP), rb: “eet physical PFN of error 
00000000'GF 50 01 48 CMPL 6*MMGSGL_MAXPFN ist here PFN data base for page? 
F OA 4 BGTRU : Br if no PFN data base for page 
7E sat Nt | GF dO 50 MOVL cFPrusAL 04/6 -(SP) 
5 40 09 51 MOVL 9(SPD¢LR ROJ,RS ; address of PTE 
1 D 26 BEQL ; none - give up 
8 d5 F 5 TSTL (R3) 
19 41 54 BLSS 5$ ; Branch if page valid 
009? 31 43 55 ss: BRwW RDSNONRES : else fatal error 
2.) EO 0346 56 5$: BBS PPTESY ae Sg (R3),12$ ; BR if page is PFN-mapped 
146 €1 Q346A 57 BBC #MCF790$V_DBL_BIT,- ; Is it a double bit error 
0B 40 AC 034C 38 MCE 79081 Maectiars 7s; If not. let page go to free List 
7E were” So DO O34F 5 MOVL G*PFNSAB_TYPE,-(SP PFN type array address 
9€40 0 88 0356 60 BISB PPENSR _BADPAG, a(SP)+CRO] '; Mark page bad 
1 04 baee 861 7$: CLRL R1 ; Clear modify bit propagator 
04 63 1A €5 O35C g66 BBCC #PTESV asthe >). 108 ; zeet (& clear) modify bit in PTE 
51 80 8F 9A 0360 6 MOVZBL arewese r  aeetty propa ator 
7E oogoegee' DO 0364 64 108: MOVL G*PFNS BASIATE, 1 spy 3 ae, of PFN state orrey 
9E40 1 88 8 43 1 BISB 1 Hin RO) ; Propagate modify bit to PFN database 
Me é ASSUME PFNSM_MODIFY EQ 128 
06 14 6F 369 BGTR 15$ ; Page not modified - he's OK 
OODC'CF 01 5 4 oY 12$: sie #MCHK_ABORT ,W*ABORT BITS’; Force an abort 
7E Q00000000'GF 00 2 % 15$: MOVL G*PFNSAW REF ENT. -(SP) : Address of ote refcnt array 
01 9€40 861 43 7 CMPW a(SP)+Cr0J, ; Check for 1/0 in progress, etc. 
ED 1A 74 BGTRU 12$ ; If so, » 4 < anything fancy 
7E Q0000000'GF 00 4 o MOVL G“PFNSAB_TYPE ,-(SP) ; Address of PFN ype array 
i$ 3 In the future we may recover from hard ecc errors on global pages 
4 5 as well, but for now we abort the image. 
0 ASSUME PFNSC_SYSTEM EQ 1 ; Check type of page 
1 ASSUME PFNSC"PROCESS EQ 0 
9E40 03 89 EC : CMPV #PFNSV_PAGTYP, #PFNSS PAGTYP 
1 4 @(SP)+CRO),.#PFNSC_SYSTEM ; Check for system or global page 
DE 1A 9 5 BGTRU 153 ; “Branch if page table or global page 
12 38 § BNEQ 308 : Branch if page is process private 
54 0 100 * GF 43 9 MOVAB G“MMGSAL_SYSPCB,R4 ; System pages are kept track of in 
5 6C AS OD 9 8 MOVL popst. PHB(R4) RS ; a working set List in the system pcb 
2a soi “ 32 BRB 40$ 


: Find the PHD and PCB for process page | 
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55 ; g $000 ‘GF c3 A2 91 308: SUBL3 G*SWPSGL_BALBASE.R3,R5 ; Bytes past fires balance set page 
gf 8 AS 9 DIVL G*SWPSGL_BSLOTSZ,R : progess header index 
5 F7 8F B1 9 ASHL #-9,R5,R ; Divide by page size 
5 Q 00°GF £4 B6 894 MULL  G*SWPS$GL_BSLOTSZ,RS5 : Convert process index 
5 9 D 95 ROTL #9,RS5_R ; to process header address 
55 0900 9 "GF =C cl 9 ADDL Es G *S wP $GL. BALBASE RS 
q AS OD C 9 MOVL cuore PCB(R5).R 3; Get PCB 
00 iF OC*€ ¢ 98 408: BBCC #PTESY VALID, (R3),50$ : Clear valid bit from PTE 
00 ODA D 99 50S: MTPR 0,#P A ; Invalidate translation buffer 
7E 0000 00° GF 00 D 90 MOVL  G*PFNSAQ_REFCNT,-(SP) : Address of PFN refcnt array 
E40 8 DA 9 DECW a(SP)+CROJ ; Reduce reference count to 
— DD 3 § BGEQ 60$ g 
(00000000 ' GF 1 DF JSB G“MMGSREF CNTNEG : 
7E Q0000000'GF 0D Se 2 : 60$: MOVL Bee neeEguonee= (SP) ; Address of PFN WSLX array 
EC 208 MOVZWL COUSPISEROI I>, = ; Get working-set List index for page 
a ONG_OPCODE=MOVL 
ae 8 IMAGE=SYSLOA790. EXE 
00000000 ' GF 8 FE 9 JSB G“MMGSDELWSL ; Delete it from the working set its in 
7E  Q0000000'GF DO 0404 £910 MOVL G*PFNSAB_STATE,=-(SP) 3; PFN type array address 
E 88 bene 911 BISB #PFNSM DELCON,@(SP)+CRO] ; Delete contents 
00000000'GF 16 r¢ a6 JSB G*MMGSRELPFN ; Put page on appropriate List 
Bct3 914 ; At this point, the PTE for the bad page contains its mass storage 
415 915 ; address. This will cause a fresh copy of the page to be fetched when 
Sete 318 3; the process is resumed. 
05 bes 918 RSB ; Log machine check and resume process 
0416 919 
3319 920 RDSNONRES: : 
O21F 30 0416 921 BSBW LOG pcHe ce :; Go log it 
0000004A 8F 00 DA 0419 9 ; MTPR #0, 3PR790$_EHSR ; Clear the VMS entered flag 
5E 4 CO 04 9 ADDL #4, 3; Clean off return address 
107F 8F BA 4 924 POPR #*M<RO,R1,R2,R3,R4,R5,R6,AP> 
00000000'GF 16 04 925 JSB G*EXESMCHK_BUGCHK ; Recovery block in effect? 
042D 926 BUG_CHECK RDSNONRES, FATAL ; Read data substitute page nonresident 
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-SBTTL MBOX 1D errors 


An MBOX error _— ore aer when 1Pt dropped below 1D 
these are not d ites} 7 related to instruction execution 
From here we will atch to one of two subcategories 
as a KA, cb “errers 
MA errors 
dg myers do not Latch the cycle type, so a separate check is required 
or 


O0000 
~OoO 


AROOO NAN EWN 9 OO NAME WN OO OOONOAUE Wi O 


@ Se Se Se Se Se Se Se Sete ee 
+ 


aXi i? goreneter RAM errors are occasionally reported here instead of as 


hBOx_1D_SERV: 

3 First make sure we have a single error, otherwise give up 
: BBS #MCF790$V_MUL_ERR, MCF790S$L_MSTAT2(AP) ,5$ 

; Now look for that errant CPR parity error 


f BITL HCE ZOOS CPR_PE_A ! MCF790$M_CPR_PE_B,- 
F790$L_MSTAT1(AP) 


OA 3C AC O07 «€E0 


ACAD 3 2 


00C00000 8F D3 
38 AC 


pole lelelelelelelelelel ele eoleleleleleloleloaiolo) 


PREP RP RRR RRR RRR RRP PRR PRE 


WwW 
m 


W000000000000000000000000.0000 
2RAANN NA NANA ES EEE EE EE 


03 «13 BEQL 
FCAC 31 ne? 5$: BRW BUGCHECK_POP ; Disaster - give up 
Bee 3; Finally, do the normal error processing 
38 AC O0000F00 BF D3 0443 {0$:  BITL wmce790SH_ 18. TAG PE ! - 
0448 CF790$M_TB_A_PE ; - 
0448 RCE 7908R- 1B 
0448 MCF790$M_ TB VAL i o 
44B thay ASTAT1(AP) 
11. 12 0448 BNEQ MBOX_1D0_CPU ; A TB problem 
53 38 AC 04 1A «6EF «60044 296 EXTZV PRCET9OSV. CYCLE_TYP, - 
045 96 #MCF790$S"CYCLE_TYP, 
045 964 F790SL_ASTATITAP),R3 ; get cycle type 
02 00D8'CF 53 €0 045 965 BBS R3,W*ABUS_CY ° ; 1s it ABUS related 
03 11 0459 966 BRB MBOX_1D_CPU ; a CPU error 
0117 «931 0458 967 208: BRW MBOX_1D_DMA 3 : DMA error 


neil” 


38 AC O0000F00 8F 


22 

003C'CF 

50. 1B 

52. 50 = 0038 CF 
OA AX 

Fc72 

OO38"CF_ 0034'CF 
0034'CF 50 


3C AC 00000060 8F 
0D 


44 38 AC 


03 
16 
03 40 AC 
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MBOX 1D asynchronous CPU error 15-SEP-1984 SYSLOA.SRCIJMCHE 
r E 98 pa -SBTTL MBOX 1D asynchronous CPU error 
45E 3 ; Handle an MBOX 1D error triggered by a CPU reference 
: ; 44 3 an gpoerat. these are non-fatal. We bugcheck only if the error rate is 
i3e aoe ; Whenever bad data is written, we ignore the error until someone reads it. 
45E 75 ; When bad data is consumed, the assumption is that it will be used (not 
45E 3f8 ; absolutely true, but not worth the effort for the slight chance that it won't 
45E 977 ; be used) and we treat this Like the MBOX FE case. 
45E 3f8 ;-- 
45—E 979 MBOX_1D_CPU: 
ri} HH , -ENABL LSB 
Oc3e 2 § ; First check for translation buffer problems 
45e 984 BITL  #MCF790$M_TB_TAG_PE ! - 
046 985 MCF790$M_TB_A_PE |! - 
0466 a89 90SM_TB_B PE ! - 
0466 43 MCF790$M_TB_VAL_PE, - 
0466 § 988 MCF 790$L_MSTAT1 (AP) 
0466 989 BEQL 208 ; Not a TB problem 
0468 990 INCL W*TB_TOTAL ; Count the error 
046C 991 MFPR #PR790$_TODR.R : Current time - 10 millisec units 
O46F 99 SUBL3 W*TB_OLB2,R0,R : Time for three errors 
0475 99 CMPL R2,#TB_THRESHOLD : Too quick 
0478 994 BGTRU 3; No 
047A 8 995 BRW BUGCHECK_POP ; Clean off return address before BUGCHECK 
047D 996 108: MOVL W*TB_OLDT, W*TB_OLD2 ; Save new times 
0484 997 MOVL RO,W*TB_OLD1 
0489 998 RSB 
048A 999 ; 
et 1 1000 ; Next cache errors. 
48A 1001 ; Cache errors are not counted if the bad data flag is set. This is assumed 
Rene 1006 3; to be the fault of some other hardware. Some previous error reported this. 
48A 1004 20$:  BITL  #MCF790SM_CSH_TAG_W ! - 
0492 1005 MCF790$M_CSH_TAG PE, - 
049 196 MCF790$L_ASTAT2(AP) ; Is error in tag or written bit 
0492 100 BNEQ CACH FR ; Yes - process cache error 
494 1928 BBC #MCF790$V_CSH_DAT BW ! = ; Is it cache error 
495 1 ? MCF790$V_CSH_BAT_NBw,- 
495 1010 WCE /OSL MSTATI(AP),70$ ; No 
499 1011 30$: BBC #MCF790$9_BAD_DATA,- ; If BAD DATA error = not fault of cache 
498 1 \¢ MCF790$L_ADECT(AP), - ; or it has already been accounted for 
re: Welz CACHE_ERR 
049E 1015 ; Cache has bad data. It either got it from memory or it was written into 
rh 4: } 16 3; cache by CPU or 10. In either case, the memory page is now useless. 
rH} \ \8 BRW BAD_MEM ; Go try to recover 
ry \ 9 3; Check for too many errors and turn off cache if necessary 
4A1 1 é CACHE_ERR: ; Entry point used for FE and others 
4A1 1 INCL Wcacne TOTAL ; Count the error 
4A5 1024 MFPR #PR7 9 TODR,RO ; Current time - 10 millisec units 
4A8 1025 BBS #MCF790$V_CSH_ERR,- ; It was cache B 
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your MBOX 1D asynchronous CPU error 18: SEP- = 1382 at Be SYSLOA.SR Coe CMEC S90. MAR; 5° = (38) 
18 38 AC 4AA 1 § +144 hae MSTATI(AP), 
52. 50 wade C3 Q4AD 1 SUBL3. wW*CSH LD2,R0,R2 ; Time for three errors 
A : D1 40483 1 : CMPL R3 PCKCRES THRESHOLD : Too quick 
16 #«1F #0486 1 BLSSU  60$ 
0044'CF eee" D 4B 1030 MOVL W*CSH_A_OLD1, W*CSH_A_OLD2 ; Save new times 
O40'CF 50 p 4BF 1031 MOVL RO, W®CSH_A_OLD1 
rh ! 4 RSB 
52 50 Bosc "EE c3 rt 1034 50$ SUBL3 wW*CSH_B B ,OLDe RO,R2 ; Time for three errors 
OA 52 01 04€B 1035 CMPL R2,#CACRE_THRESHOLD : Too quick 
6E iF O4CE 1 g 60$ BLSSU CACHE_OFF~ 
004C'CF goto" tS 4 4D 1 MOVL w* i BF OLDt W*CSH_B_OLD2 ; Save new times 
O048'cF 50 DO O4D7 1 8 MOVL RO, uresH -B_6LD1 
Oi the 
nope 196) data address parity error 
28 40 AC 13 E1 04DD 1908 50S: BBC #MCF790$V_ADR_PE ; Something else 
O4E2 1044 MCE /OOSL -ADECT CAP), 80$ 
oose ee D1 Ree 1392 CMPL OtmeOn FE EN co ye 3 same physical address 
32 13 O4E8 100? BEQL Ss¢ s yes - bugcheck 
50 18 08 O4EA 1048 MFPR een rpos TODR,RO ; Current time - 10 millisec units 
52 50 0O024'CF C Beee 1049 SUBL3 MBOX FE OLB RO,R ; Time since last error 
02. 52 D1 O4F3 1050 CMPL #MBOX~FE » FARESHOLD 
g 1F bere 1051 BLSSU 3; Too quick = bugcheck 
0024'CF 0 dO O4F 1036 OVL RO, W*MBOX : Save time of this error 
0028'CF SC AC 00 O4FD 105 MOVL MCF790$L XBCCRP). Ww°MBOX_F : Save PC 
0030'CF 50 AC DO 0503 1054 MOVL MCF 790S$L“MEAR(AP) , Ueno” FES “PHY ADR | Save physical address 
Bie 
050A 1057 : Double bit or bad data errors from aonery. 
QOSOA 1058 ; These errors are either in the context of the correct process or the BAD_MEM 
B20, 1923 3 routine will spot it © 
40 AC 00500000 8F 03 0308 1961 80s: BITL once 70sh Bap opera 3 ! = ; check error bits 
0313 1068 MCF 790$L MADECC CAPS CR 
03 13 O512 1064 BEQL ; Nope - something else 
FOFC 31 B31 1902 BRW BAD_MEM ; Go try to recover 63 
0317 $3 : ABUS bad data flag cs 
OE €0 0517 1 $9 $0s: BBS #MCF790$V_AB_BAD_D AT. : Go count misc errors cs 
3C aC 219 29 RCE Z9OSL ASIRTZCRPD 7 63 
aif ! a’ 95$: : Fall through to misc HH 
31¢ 24 : misc MBOX errors HH 
a1¢ 1 id isc _MBOX 1D: EB 
5C°CF D6 1 107 IARCL W*MBOX 1D ODR AO ; Count the error EC 
1B «OD 5 1 8 MEPR oer 90$_T : Current time - 10 millisec units EM 
52 50 9058" ¢F C 5 107 SUBL3 MBOX 1D “BL6¢ 80 : Time for three errors EM 
A D1 0529 1080 CMPL #MBOX" 1D + ORE EROLD : Too quick EM 
1A O052C 1081 BGTRU ; No EM 
31 O52E 1082 BRW 1 ce cop ; Clean off return address before BUGCHECK EM 
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yoarb0G MBOX 1D asynchronous CPU error 1 ~$Fb= 1 382 et YEYSLOR. SRETACHECK90.MAR: 5 - (3) 
OOS8'CF OOS4'CF OD 531 1083 100$: MOVL W*MBOX_1D_OLD1, W*MBOX_1D_OLD2 ; Save new times 
bose'tr $0 o9 8 1084 MOVE — RO, W"RBOR_ Lan soy 
2 ; 1 § : -DSABL LSB 
2 : | 8 ; Handle turning off the correct half of cache 
53E 1090 CACHE_OFF: 
50 00000042 8F 43 5 1091 MFPR #PR790$_CSWP,RO ; Get current cache state 
02 = é€ 545 1 3 BBS #MCF790$V_CSH FR - ; Which half is at fault 
05 38 AC 547 109 MCF790$L_PSTAT1 (AP) ,10$ 
50 06 88 34, 34 B18 #CSWPSM_CIENA ! CSWPSM_VAL,RO ; Cache 0 - Leave 1 on 
0 O05 88 QO5S4F 1 38 10$: BISB #CSWPSM_COENA ! CSWPSM_VAL,RO 3; Cache 1 = Leave 0 on 
00000042 8F 50 ODA b328 1097 208: MTPR RO,#PR790$_CSwP ; Disable it 
10 88 0559 1098 BISB #mMCF790$M_RSRC REM,- : Indicate resource removed 
04 AC 4 1099 MCF 790$B_ACHK_CODE (AP) 
51 O1E8'CF DO O55D 1100 MOVL W*CACHE_ASG,R ; Mesage length 
*¢ OQIEC'CF 9E 266 1101 MOVAB W*CACHE MSG+4,R2 3; Message address 
55 O000000'GF 9E 056 1106 MOVAB G*OPA$UTBO,RS5 3; Send it to the console terminal 
00000000 ' GF 48 Bagt 3 jee G* IOCSBROADCAST 
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yoec064 MBOX 1D ABUS (DMA) errors 15-SEP-1984 9b: 0R 32 OYSUOA. SRE AICHE CKS90..MAR; 5 aa (3, 
27 i} $ oe -SBTTL MBOX 1D ABUS (DMA) errors 
Te Re 8 : Handle an MBOX 1D error triggered by an ABUS reference. 
B22 is : in general, these are non-fatal. We bugcheck only if the error rate is 
s too e 
57 Wit ; Whenever bad data is written, the error is ignored until someone reads it. 
2f 1116 : Errors on reading are handled by device drivers. 
32 14 MBOX_1D_DMA: 
iH 1118 : Cycle type is in R3 = This must not be destroyed 
252 1118 : ALL errors require logging the ABUS error summary register and unlocking the 
b228 1133 ; adaptor. 
oe 0378 1121 EXTZV #MCF790$V_AB_ADPT,- ; relative I0A number 
50 38 AC 02 0577 11 ¢ #MCF790$S_AB_ADPT, - 
0578 11 MCF790$L_ASTATI(AP), RO 
01 eoodied 7) Bare 1) : as ¥ ADUS_TYPECROS .#1 - ant 
3 no 
51 Q000°CF40 00 b383 1126 MOVL W*ABUS_VACROJ,R1 3; base address of SBIA 
04 AC 40 8F 88 0589 1127 BISB #MCF790$M_SBIA_ERR, - ; add SBIA error summary 
OS8E 1128 MCF790$B_ACHK CODE (AP) 
och tt dO baae 1163 MOVL hel yee tg he ; Save the error summary 
08 Al O08 Al C8 S238 119) BISL SBI ASL SURRY RI} « - 3 Clear all the error Locks 
34 AO 00001000 8F C8 0599 1133 BISL #SBIASA_CTO, - ; and the CPU timeout bit 
O5Al 1134 SBIASL_SBIERR(RO) 
O5A1 1136 : Check for cache errors. 
Q5A1 1137 ; Cache errors are not counted if the bad data flag is set. This is assumed 
Beat 1138 3 to be the fault of some other hardware. Some previous error reported this. 
3C AC 00000060 8F 03 B24} 1179 20$ BITL PACE SOSA CoH TAS - 
OSA9 1166 MCF7S90SL_MSTATZ(AP)  ; Is error in tag or written bit 
OB 12 OQOSA9 114 BNEQ 35$ : Yes = process cache error 
E1 Q5AB 1144 BBC #MCF790$V_CSH_DAT BW ! - ; Is it cache error 
OSAC 1145 MCF 790$V_CSH_BAT_RBw,- 
13 38 AC 03 OSAC 1146 MCF790$L~MSTAT1(AP),40$ ; No 
6 €1 Q5B0 1147 30$: BBC #MCF790$9_BAD_DATA,- 3; If BAD DATA error - not fault of cache 
0B 40 AC 05 928 1303 ao. MCF790$L_ADECC(AP),38$ ; or it has already been accounted for 
05 3c AC 04 €1 0386 1150 35$: BBC #MCF790$V_CSH_W, - 3; cache not written 
5BB 1151 MCE /9OSL ASTAT2(AP) , 38S 
32 3c AC 6206) «CEO O05 1138 BBS #MCF790$0_CSH_TAG_PE, - ; parity error 
5c0 (115 MCF790$L_ASTAT2(AP) ,50$ : tag error with W bit set - bugcheck 
FEDE 31 ¢ 1123 38$: BRwW CACHE_ERR 
5¢ 1128 : Check for MDECC errors. 
5C3. 1157 ; Simply log them except for a bugcheck on a data address parity error. Here 
5¢ 1128 3; data probably went to a wrong location so crash fast. 
5¢3. 1159 ; In the case of double bit errors in memory, the page will eventually go to 
C3 1160 ; the bad page list. 
: 119) 3; The device will also get an error on reads. 
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vet MBOX 1D ABUS (DMA) errors 1$-SE- 1382 01:08:38 LeYSLOA. ORES aCMe CK 90. MAR; 5 . (a9) 
13. EO O5C3 1163 40S: BBS #MCF790$V_ADR_PE,=- ; Address parity error = bugcheck 
2A 40 aC CS 116% MCF 79081 SADECT (AB) ,508 oe 
40 AC 00500000 8F 03 C8 1165 BITL #MCF790SA_BAD_DATA ! = 
D 1196 MCF790$M_DBL_BIT, - 
DO 116 MCF 790$L—MDECC (AP) 
3 13 D 1198 BEQL 60$ ie something else 
50 SO AC F7 8 7 D2 116 ASHL #9, MCF790$L_MEAR(AP), rb et physical PFN of error 
00000000 ' GF 0 D1 0508 1170 CMPL RO, G*MMGSGL _MAXPFN i dst here PFN data base for page? 
10 1A OQOSDF 1171 BGTRU 45$ ; Br HH no PFN data base for page 
14 +€1 OSE1 1126 BC #MCF790$V_DBL_BIT,- : Is it a double bit error 
0B 40 AC 5E3 117 MCF ia} AADECT CAPS , 45$ ; If not, let page go - free list 
7E 00000000'GF 00 5E6 1174 MOVL G*PFNSA PE,-(S PFN type array addres 
9€40 20 5ED 1175 BISB #PENSM “BADPAG.@(SP)+CROJ’; Mark page bad 
05 ber 1158 45$: RSB 3 “Log it 
FAFA 31 03t 1128 2 50s: BRW BUGCHECK_POP ; Clean off return address before BUGCHECK 
OSF5 1180 3 3; Check for NXM 
OSF5 1181 : —eeery from q write to gonery is impossible and it doesn't seem to be 
OSF5 1136 3 3; worthwhile to Bn to distiguish it from a read since something is very 
bere Vaz 3 wrong in any case. 
FB 3C AC 03 EO OSFS 1185 40S: BBS #MCF790$V_N NXM 
OFA 1186 MCF 790$L VASTAT2CAP), 50s * 
OSFA 1188 ; The only other error to really worry about is ABUS address PE or control PE 
aN 1150 3; ALL other errors return a device error. 
38 AC 00180000 8F D3 O5FA 1191 $0$:  BITL  #MCF790$M AB ADR PE! - 
0602 136 MCF790$M_ M_PE 
0602 119 MCF 790$L MASTRIITAPS 
EE 12 0602 1194 BNEQ 50$ 
05 0604 1195 RSB ; Not address or control PE 
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e 
$0 1132 ; -SBTTL SBI vectors & error handling 
6 1198 ; SBI alert, fault ard error are handled here 
6 1200 ; ALL interrupts cause ’ full SBIA fog 
? 2 ! 1 ; SBI fail is treated Like power fail and is handled elsewhere. 
6 1 a8 ; Stack on entry: 
6 1204 ; ointer to SBIA base address 
$ ‘ pair 
$82 ! 8? C,PSL pai 
605 1 09 : ALIGN LONG 
608 1 8 EXESINTSS: : ; SBI ALERT 
6 1 EXESINTSC:: ; SBI FAULT 
107F 8F BB 608 1 19 PUSHR #*M<RO,R1,R2,R3,R4,R5,R6,AP> 
53 20 BE 00 60¢ 121 MOVL a<8«4>(SP5,R$ : SBIA base address 
51 SE C1 610 1 ae aecont3 #<9%4>,5P,R1 : Point to PC,PSL 
009E 30 O64 1214 “ BSBW LOGSBI : Go log it 
107F 8F BA 617 1215 POPR #*M<RO,R1,R2,R3,R4,R5,R6,AP> 
5E 04 CO 061B 1216 ADDL #4,SP : Get rid of the base address 
02 O61E 1217 REI 
OeIE 1519 | 
O61F 1220 ° ALIGN LONG 
0620 1221 EXESINT6O:: ; SBIA ERROR 
107F 8F BB 0620 1 ¢ PUSHR #*M<RO,R1,R2,R3,R4,R5,R6,AP> 
53 20 BE 00 06 & MOVL. a<8*4>(sP§ R$ : SBIA base address 
51 SE 24 C1 628 1224 ADDL3 #<9%4>,SP,R1 3; Point to PC,PSL 
Ie E1 Q62C 1225 BBC #SBIASV_IME,- : Is it an unrecoverable internal error 
E3 08 A 062E 1226 SBIASL_SUMRY(R3),SBI_RECOV ; No 
0081 30 0631 1227 BSBW LOGSBI 3; Go log it 
0634 1228 BUG_CHECK SBIAERROR,FATAL 
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| 
Oe ! a -SBTTL Logging routines for machine checks 
? ! ; LOG_MCHECK -= format inputs to LOGGER 
6 1234 ; 
6 1235 : siedbeone }' INPUTS: 
i gi: : (AP): points to machine check log on stack 
3 1238 : OUTPUTS: 
06 1239 : Error is formatted and logged in system error log. 
6 1240 : If no error oe buffer, return with error status in RO. 
6 124 ; RO-R6 destroye 
6 1242 ;-- 
06 124 
0638 ! te LOG_MCHECK: 
3 8 1246 : Test if a machine check recovery block that specifies no error 
ett ! tp 3 logging is in effect. 
1 FRAC 7D 0638 1249 MOVQ -8(AP),R ; Get PC-PSL pointer and mask in R1,R2 
00000000 ' GF 1g 063C 1250 JSB GFENESACHK.TEST 3 Logging inhibited? 
36 50 ~«2€C€ pete \$2) BLBS : Branch if YES - but go clear SBIA 
0645 1 26 ; Set up inputs to LOG 
QOO000000'GF D6 0645 125 INCL G*EXESGL_MCHKERRS : Bump machine check error count 
51 00000074 8F DO 0648 1254 MOVL #ncE 90$C_PSL - ; Size of machine check frame 
0652 1255 EMBSB_MC_SUMCOD - ; Add space for log header. 
bee 1256 oR ; SBIA summary 
Q00000000'GF 16 0652 1257 JSB G*ER{SALLOCENB : get Rah Logging buffer. 
2050 €9 0658 1258 BLBC ; f failed to get buffer. 
3§ DD 0658 1259 PUSHL R2 e butter addr on stack. 
04 A2 QO BO 065D 1260 MOVW #EMBSK_MC, EMBSW_MC _ENTRY(RD) Set entry type. 
0060 8F 28 0661 1261 MOVC3 #MCF790SL_PSL ; transfer info to log 
04 AC 0665 1966 Bce (0st “ESR CAP) - ; do not include the size word 
10 A2 0667 126 EMBSB MC Co SUMCOD (Re) 
06 €1 0669 1264 BBC #MCF790$7_S Should the SBIA error summary be added 
05 04 AC 066B 1265 MCF 79088 ACHK ACODE (AP 188 
63 OOEO'CF oO bose 1266 MOVL W*SBIA_ERR_SUM, ( ; Add summary at end of MOVC3 transfer 
04 BA 0673 1267 15$: POPR | ores ; Retreive buffer address. 
00000000'GF 16 pore ! re JSB G*ERLSRELEASEMB : Give buffer to logger. 
gore ! 79 ; Now see if we need to log the SBIA data 
05 €1 0678 1 % 20S: BBC ench rosy SBIA Is the logging flag set 
12 04 AC 67D 127 MCF r3 $8 ACHK CODE CAP), abs 
1 EF 0680 1274 EXTZV #MCF 0_AB_ * ; relative I0A number 
50 38 aC 02 36 ¢ ! ie MCF790$S"AB_ADPT, - 
53 QOO00'CF40 DO 0686 1 r§ MOVL W*ABUS_VACROJ,R3 ; base address of SBIA 
51 F8AC 7D Q68C 1 oe MOVQ -B(AP)>R1 Get PC-PSL poinper and mask in R1,R2 
3 ie § re ' 4 BRB LOGSBI : Go to the SBIA logger 
05 069 1583 40$: RSB 
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-SBTTL Logging routines for use by adaptor error routines 


; MCHKSGL_LOG -- format inputs to LOGGER 


OUTPUTS: 


R3: error type code 
R4: Length of frame 
RS: address of frame 


Error is formatted - mongee in system error log. 
If no error on. buffer, return with error status in RO. 
RO-R5 destro 


MCHKSGL_LOG:: 


PAELLA AA AAA AAA AAO 

OWOOOOOOOOVOOOOOOOOO 
kk kk kk tk kt 
COODOOCOCOCOCOCOCOOOOOOONO 


DNAWE WN $$ O ODA NEW OOOO UNE 


o-onaom—-om 
MAOCWOST OO— 


rs #EMBSB_MC_SUMCOD,R4,R1 ; Space for log header 


GER, SALLOCENS 3; Get a buffer 

BLBC RO,10$ No space - give 

PUSHL R Save address bs eter 
MOVW =o Recta MC_ENTRY(R2) Rason code 

MOVC3 EmaSB_MC_SUMCOD( chal Move the frame 
MOVL : Get back the address 
J$B CSE RS coon : Give buffer to logger 
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vee SBIA Logging RISES aR Pe ame AY ai ee Sl 


-SBTTL SBIA logging 


: This deg beng is used to log SBIA (I0A) and SBI registers and related 
information. 


INPUTS : 
3 R1 => Address of PC 

H R3 => Base adress of TOA registers 
i 


685 1 10 — 
685 131 
685 131 
685 131 
685 1314 
685 1315 
685 1 18 
685 131 
52.01 v0 bees 1319 LOGSBI: MovL wACHKSM LOG R2 Mask if Logging is enabled 
: ; Mask to test ogging is enable 
00000009"GF 16 688 1520 SB G*EXESHCHK. EST : Enabled? — 
0 8 4 eae 1 BLBC 3 yes 
of 1 Q6C1 1 5$: BRW 3 go clear errors 
55 1 00 06C4 1 108: MOVL R1,R5 3 ave address X.. PC, PSL 
6C7 1324; adep silo registers erhead 
OOOO00ES 06C7 1325 LOG_SIZE = <j a : <16%#4> + < 1243 + EMBSB. MC_SUMCOD 
51 OQOO0000E4 8F 00 O6C7 1 § #LOG_SIZE : Need this much for error log buffer 
00000000'GF 16 O6cE 1 JSB GAERCSALLOCEMB ; Request it 
A50 €9 Q6D4 1328 BLBC RO,5$ t it - vee. =  mtetty 
04 A2 0D BO 06D7 1329 MOV #EMBSK SBIA, EMBSW_MC _entrver2s § "Eatery type 
54 52 000000E4 8F ci 0608 1330 ADDL3 #0 G_SIZE,R2,R4 ; Address of end ot error log buffer 
74 = 65 D O6E 1331 MOVQ (R5) Lt} 3; PC, PSL 
56 Q0000000'GF DO O6E6 1 3 MOVL Gnexéscr _CONFREGL ,R6 ; Array of NEXUS Goutee type codes 
55 Q0000000'GF DO O6ED 133 MOVL CARMGSCL~ SBICONF ,RS ; Array of ada epter 
29 D4 pore 1334 CLRL R 3; Start with the Baty SBIA 
QOOOO000'EF4O 5 D1 O6F6 1335 15$: CMPL R35. ABUS_VACROJ : Is it this one? 
13 O6FE 1336 BEQL 208 
F250 04 F2 0700 1337 AOBLSS 15$ 
0704 1338 BUG CHECK EBT AERROR, F FATAL : No match 
50 Q0000000'EF4O 9A o708 1339 20$: MOVZBL ABUS_INDEXCROJ,RO 3 index in arrays for this SBIA 
50 650 O¢ 78 0710 1340 ASHL #2,R0,R0 ; Get longword offset 
28 5 CO 0714 1341 ADDL R 3 EXESGL. ONF REGL 
5 50 cO 0717 1346 ADDL RO *R5 : G$GL_SBICONF 
50 OF 00 O7IA 134 MOVL wis ne : Index of Last possible item on SBI 
74 D& O71D 1344 30$: CLRL -(R 3; Assume no adaptor here 
51 6540 DO O71F 1345 MOVL CRE) EROI RI ; Get VA of controller/adapter 
08 18 0723 #1 46 BGEQ : GEQ implies no valid system VA. 
6640 D5 0725 134 TSTL (R6)CROI ; Test adapter type 
ae 728 1348 BEQL : If eql, no adaptor here 
64 4 DO O72A 1349 MOVL (R1),(R4) ; Store adaptor SRO on stack 
ED 50 F4 O072D 1350 40$: SOBGEQ RO 368 : Loop thru all possible 16 
50 OF DO Q7 1351 MOVL - Set up count of times to read silo 
74 30A3 00 Q7 1 26 50$: MOVL SBiASL_ SBISILO(R3) ,-(R4) b Seve intoreptien for error logger 
F9 5 F4 Q7 1 2 SOBGEQ on 
74 8A i) 73A 1354 MOVL SBIASt. TMOADDRS(R3) ~<nai | SBI ctasout eceress 
74 34 a3 00 O73E 1355 MOVL  SBIASLSBIERR(R3) ,-(R4) ; §B1 error registe 
7% «6464 4A D 742 «(1 2$ MOVL SBIASL_MAINT(R3) “(R4) SBI maintenance register 
74 «640A 1) 746 «135 MOVL SoA BEMBERS) ce thaD: SBI silo comparato 
74 _ SCA D 746A (1 38 MOVL SBIASL_SBISTS(R3),-(R4) ; SBI fault/status register 
7% 63 OD at: 135 MOVL SBIASLICR(RS) (Rd) ; IOA_CF (configuration register) 
7% As 3 1360 MOVL  SBIASLCSR(R35,-(R4) —: ‘IOATCS (control/status register) 
74 8A D 755 +1361 MOVL SBIASL~SUMRY (RS) -(R4) ; IOA_ES (error summary register) 
rs f & 1) £38 1 66 MOVL SBIASL-DIAGNOS (RS), ~(R4); I0A_DC svaddress control register) 
74 iO A 1) 75D 136 MOVL SBIASL_DMAICA(R3) ,=(R4) : DMAI cmd/address register 
74 #144A D 761 1364 MOVL SBIASL_DMAIID(R3) ,-(R4) : DMAI ID 4 ster 
74 IBA D 765 1365 MOVL SBIASL_DMAACA(RS) ,-(R4) : DMAA cmd/a gress register 
74 1C A D 769 1366 MOVL SBIASL_DMAAID(R5),-(R4) ; DMAA ID register 
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615 :01:32 YAX/VMS Mace Page 35, 
~1984 0):01: MAR; 5 (22 
Se Te ING CHECK 18-86-1986 45:48:36 PySLOA. SREINCHECK 90. 
MCHECK790 Single Bit (CRD) error handling 
vor 7A3. 1379 -SBTTL Single Bit (CRD) error handling 
fag} y aes ingle bit errors. F de 
; This routine logs sing error log entry is ma 
PA Vie | SE bce hy heals ceees eererstorantratt fis — 
A turned o 
n with CRD interrupts 
rh Dot y ° son caune oh'te ates Gnblonnte errors. Instead, we will only 
rh : 5 ‘disable Logging of the errors. 
7A3 1 
Aron LONG 
B°Cr 6 EB OAS #*<RO,R1 ROD BPE 
“pe cr be 7A8 38 ae WER EOTAL : Next stot in CR CRD log buffer 
OtaC'CE DB QVAF 1394 Ov, YAO ERT ids ir initializes 
 oeeeh ae Bre 1388 ROVAB WSCRD FIRST ENTRY.RO | bares fice Je CRD Log 
30 QOEC'CF : ree i 38 MOVL RO WCRI st LSPA : MDECC code to scratchpad address 
DB ORE? 4309 RFPR mek 96$ RSPD TRO) + e pais meas’ tchpad address 
f Be Rte lee MIPR KDA. BPR OOS. LSP ; MEAR code to scra 
; DB 5 1201 RFPR Arn 7908 4 «A : aay arb code to scratchpad address 
DB Ore 1408 Rr PR sen TSO8. mit ye Mae fotenk 33 time - 10 millisecond units 
iB DB 7EA 1404 RFPR Ag leg Cp Ont R R2 ; Time for three errors 
F CS OED 1408 ets R2. acRD- TARE SOLD ; Too quick 
52 Bt OFS 1608 sc su CRO Be times 
+ ae ae ee pe ROVE W°CRD OLD we W*CRD_OLD2 =; Save new 
San A ; End of buffer 
ef 9 a5 1410 a Rosa BUF END. m : is buffer full? 
; Yes 
08 1 B10 1412 mOyL” RO. 0 O°CRD NEXT ; Next buffer slot 
0 12 ve POPR «oB*HCRO RT Ro> 
O78 0819 tats 208: REL 
; for reuse. 
1, 1447 : Log the current buffer and clear it for 
A : ; 
3 A 1419 ERD_LOG: anit at et ; Mask to test if logging is enabled | 
; a 00 if 12 ase" GK ESACK. £31 ; ia? eo clear butter oe 
% cB 25 14 § BLBS ae ss 0G_SIZE + EMBSB_MC. Ee. Le Error log bu 
51 oF 1 12S¢ isa OUGFER to LCOCEMS r yg ie just clear the buffer 
So es 1259 ROV —BEABSK _CRD, EMBSW_MC _enthy’ ; Entry type code 
scymniti: Dd BSF 14 § nove n W*CRD_BUFFER ; Move log to buffer 
00E4* CF 33 i 14 6 nove Enésa RC nee 
10 A2 POPR o*n RE 
th te G*ERLSR ' t in CRD log buffer 
8 8 8 ie 3 16 § 10$ ROVAB ve = rin! aeNTRY, " ; Hae. ioee next time 
ae Biss ROVES  BO;<RO) FOS ; Clear the buffer 
Ghacrce ; i A 1435 movcS # 
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GaANg cH vote handling 19-3e b=} 382 91:01:32 OTS LOK. RETAICMECKT90.MAR;5 
14 § #CRD_BUF_END-CRD_FIRST_ENTRY,- 

14 RO)~ 

14 8 POPR #*M<R3,R4,R5> 

14 POPR #*M<R *R1 *R2> 

eae 

14hg i Turn off CRD error reporting for 5 minutes 

Vez ; Due to hardware bug, we will not turn off interrupts, only logging. 

1445 trp _OFF: 

1209 MFPR #PR790$_MERG,RO ; Get current error reporting state 
1447 Bess RO. env90s Reng RO,10$ ; Turn off CRD reporting 

1449 ” MOVL #1,W* "Frags ; Indicate CRD reporting turned off 
1450 BRB CRO LOG” ; Go log it 
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: 1 S soe -SBTTL CRD reenable timer routine 
—E 14 Pree ine called by. ove - glace routine. 
— 1455 ; D report "9 sabled and the timer has expired, reporting is 
; 1 gi 3 Saonahted if alt iF, by the SYSGEN parameter. 
—E 14 : ECCSREENABLE: : | 
50 oD 8 145 PUSHL RO | 
1F QOES'CF €E9 1460 BLBC W*CRO_FLAGS,20$ ; Return if reporting is not disabled 
O6C'CF d7 7 1283 DECL W*CRD_TIMER 
19 14 79 «14 § BGTR 208 ; Timer not expired yet 
00000126 ,8F 00 O87B 1463 MOVL cee Ther TIME ,= ; Reset the timer 
00000000'8F €1 a8 1465 BBC #EXEST_CRD ; Check SYSGEN parameter 
04 00000000 ' GF 4 1406 GrenesL. pene "208 3; Br if CRD's not wanted 
0890 1208 : Due to hardware bug, we did not turn off interrupts, only logging. 
0890 1239 : MFPR #PR790$_MERG,R ; Get current error reporting state 
0890 1471 : BBCC #HERGSY tga? RO,10$ : Turn on CRD reporting 
0890 1906 3710S: MTPR RG 
oes" CF D4 0890 1423 ai cURL u* ERD ; Indicate CRD reporting turned on 
OOBO'CF D7 0896 1475 ‘ DECL O° REEPALIVE TIMER ; Decrement console keepalive timer. 
01 he Ba9A 1026 ae 30$ 3 rae if a, Lo has expired. 
089D 1478 30$: > Fall into CONSKEEPALIVE.. 
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S MACH 
CONSKEEPALIVE SEP=1 SYSLOA.SRCJMCHECK ) 
8 1% 9 A -SBTTL CONSKEEPALIVE 
+4 1? § ; CONSKEEPALIVE = DETERMINE IF VENUS CONSOLE SOFTWARE IS STILL FUNCTIONING 
4 1? : 7 FUNCTIONAL DESCRIPTION: 
90 14 § ; THIS ROUTINE IS CALLED PERIODICALLY TO DETERMINE IF THE VENUS CONSOLE 
90 14 ; SOFTWARE IS STILL FUNCTIONING. IT READS THE TIME-OF-DAY PROCESSOR 
9D 1488 ; REGISTER, WHICH IS INTAINED BY THE CONSOLE SOFTWARE. IF IT IS 
8 1? i! H NOT BEING UPDATED, THEN THE CONSOLE IS REBOOTED. 
9D 133 3 INPUTS: 
9D 14 $ a5 - ADDRESS OF CRB 
9D 1493; 
$44 1494 ; IMPLICIT INPUTS: 
28 1032 3 THIS ROUTINE IS EXECUTED ONCE EVERY ‘'KEEPALIVE_TIME* SECONDS. 
9D 1299 3 IMPLICIT OUTPUTS: 
9D 1498 ; THE VENUS CONSOLE MAY BE RE-BOOTED. 
9D 1499 ; 
8 9D 1500 ;-- 
9D 138) 
9D 15 § CONSKEEPALIVE: 
50 ODD 9D 150 PUSHL R 3; Save a register. 
50 18 dB oF 1288 MFPR #PR790$_TODR,RO ; Read the TODR register. 
OOB4'CF 5 D1 pens 1505 CMPL RO,W*TOBR_VALUE ; Has the value changed? 
is 13 OBA 1306 BEQL 20 ; Branch if not. 
OOB4'CF 5 DO OBA9 150 MOVL RO,W*TODR_VALUE 3 Save most recent value. 
OOBO'CF  QOO0005SA BF D0 BaAg 1508 10$: MOVL #KEEPALIVE TIME, - 3 Re-set the timer so we are called 
0887 1509 W°KEEPALIVE_TIMER > again. 
50 8EDO 0887 1510 POPL RO 3; Restore the register. 
05 O8BA 1511 RSB 
0888 1316 20$: 
O88 1313 3; Reboot the console, and log that we did it. 
00000048 8F 01 DA QO 1316 MTPR #1, #PR790$_CRBT ; Reboot the console. 
06 os O8C2 1517 PUSHR #*M<R1,R2> 3; Save some registers. 
, ee ee 3 C4 1318 MOVL #EMBSC_HD_LENGTH+1,R1 ; Allocate a header plus one byte. 
00000000'GF 16 C7 (151 JSB GERLSALLOCEMS ; Allocate space in the errorlog buffer. 
B50 €9 CD 1520 BLBC RO,20$ 3; Branch if unable to allocate. 
04 A2 11 8680 DO 1 1 MOVW #EMBSC _CRBT, - ; Set entry type = console reboot. 
D4 1 : EMBSW_AD_ENTRY(R2) : 
8 A2 9% D4 13 CLRB EMBSW_HD _ENTRY+1(R2) 3; Set flag = reboot attempted. 
00000000'GF 16 D7? 1524 JSB Sa GRLSRECEASERS ; Release the errorlog data. 
06 BA 44 1525 POPR #*A<R1,R2> 3; Restore the registers. 
CD) 0611) «=(08DF «615 § BRB 0 ; Join common exit code. 
tt 15 
O8E1 1528 - END 
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Symbol table 

K_SBIA : D 
ABUS CYCLE 80000008 EMBSU-HD ENTRY = $090000¢ 
ABUS_ INDEX eeesesce 6 rg fg eteerere ; 
ABS TYPE cenewees ERL SRELEASEMB eevences 
ABUS VA 0000004 EXESAB_MEMERR 00000070 RG 
sorte at Me : EXESGL ~CONFREGL eeeceees 
ADP$L_UBASCB - 8 44 EXESGL FLAGS Reeeeeee x 
ADPSW"ADPTYPE = Q000000E 0 EXESGLMCHKERRS teeeeeer x 
BAD“ACH 90000062 RO EXESINTSS B0007A8 RG 3 
BAD-RER” Sooousis Rg EXESINTSS 608 RG 03 
BAD “MEM 0000313 EXESINT e0s RG 03 
BUGS “MACHINE CHK paneess ag EXESINTOO Socsesaa a) 
BUG$_RDSNONRES sec 6 EXESMCHK 00000000 RG 3 
oueenecR Tee 000000F2 R~ 03 EXESMCHK, BUGCHK eexeesee X03 
BU QOOdbOFS ROS EXESMCHK-ERRCNT 00000000 Re 08 
BUGCHECK_NOLOG 03 EXESMCHK EST Re2eaaeaeeee xX 0 
CACHE ERR DOObOAL R 03 EXESV_CRBENABL 50000073 . x 3 
CACHE -MSG QOOO0IES RO E ERR . §& 
CACHE ~OF F QO000s8E ROS FBOX MSG saauo8® R 0 
CACHE-TOTAL 90000050 02 FBOX~OLD2 09000015 R 0 
Heceaot Sn an ce HB 
CRO BUFFER” 0000004 R 02 FBOX~TOTAL 90000014 R 92 
CRO_BUF END SOO00TAC RO TBOX_OLD1 90000000 R 02 
ERO-FLAGSTeN d0000e6 R 08 IBOX~OLD2 se0081 84 R 08 
pate eae RC - SBR 
CRD_LOG SIZE : ACR =O 1BOX~ TOTAL 00000008 R 92 
-mere 9000086) 03 1OCSBROADCAST ereseree XO 
ERD-OLD 80000060 Ro IOCSGL_ADPLIST tenses =X 05 
ERD-OLD? agoaooge R 08 IPL$_ASTDEL = 90000002 
CRD-REENAB_TIME = 9000012¢ bel bh, ive Sine = 000005 
ERO-TIMER 1 0990006 R 03 KEEPALIVE-TIMER 9000080 
0-10 2 ee Oa 
CSH-B-OLDI 000 ° 48R 0 BOR 1D_cPU 0900456 R 03 
CSH~B-OLD2 44475 ling RBOX"1D-OL01 i 000004 R 0 
CSUPSA_COENA > 2 MBOX~1D~OLD2 $6 R 
aot BR 0 MBOX" 10~ THRESHOLD s ° A 
EB0x_oCD1 bo000i¢ MBOX~1D-TOTA CR 
Foon okRG ooosEF RO MBOX~FE~OLD GR 
EBOX”SERV 3 MBOX~FE-PC § R 
EBOX~ THRESHOLD = 00 4 . MBOX"FE-PHY ADR R 
ECCSREENABLE DO00BE RG OS MBOX~FE-SERY ca 
eC CSREENARL. ° 5 MBOX~FE~ THRESHOLD = 
EMBSB_MC_SUMCOD 11 MBOX FE TOTAL CR 02 
prose -CaeT ° 10 MCF 790$6_MCHK_CODE : 4 
petriee . RCE 908¢ ABU 5 : 8 
EMBSK—MC = 00000008 MCF 790$C~ABUS_REFL = 
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Symbol table 


MCF790$C_ABUS_WRT 
MCF 790$C~CP_READ 
MCF 790$C~CP-WRT 
MCF 790$CEBOX 

MCF 790$CEBOX_PORT 
MCF 790$C~F BOX 
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A 
ALERR 


SBSSSSTSTSESBIESTITSITIITTST 
o> > > > > > > >_> >_> 
PMOOOOOOO0O0O0000000 


GL_CO 
MCHKSM_COG 
MCHKSM_MCK 


MMG$GW"BIGPFN 
MMGSREFCNTNEG 
MMGSRELPFN 


N 
PENSAW_REFCNT 
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SYSLOA.SRCJMCH 
i 
1A 
1% 
9000009 
00001C 
0 BR08 
00 
sii 
S000 
444454 5 
+44 96 
0000693 RG 03 
0000001 
0000002 
4444494 
00000001 
00000097 R 03 
0000051C R 03 
ekkkeeee x 03 
ReeKKRER K 03 
ReeKHRER x 03 
eeeeReeh x 03 
Rekkeeee x 03 
eekeeeee x 03 
eeKKRERe x 03 
ekkkeeee x 03 
00000069 R 03 
ekkkeeeh x 03 
0000006C 
RReKEREE x 03 
ekekkene X 03 
ekkkeenh x 03 
eeeeeeee x 03 
Rekkeeee x 03 
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PR790$_ TODR 
PSL$S_CURMOD 
PSL$S_IPL 
PSLS$V~CURMOD 
pst sy IPL 
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ROS Ss 
Cerher MCHK 
SBIASL_CR 
SBIASL_CS 
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SYSLOA. SRC SACHECK 790. MAR; 5 (24) 
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PSECT name Allocation PSECT No. Attributes 
BON 0008 ( 8} 0¢ 0.) NOPIC USR CON ABS LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 
SABSS$ 44 ( 8 -») QO1¢ +1.) NOPIC USR CON ABS LCL NOSHR EXE RD WRT NOVEC BYTE 
MCHKSDATA O000022A ( 554.) ¢ ( ¢°} NOPIC USR CON REL LCL NOSHR EXE R WRT NOVEC QUAD 
MCHKSCODE Q00008E1 ( 2273.) ( -) NOPIC USR CON REL LCL NOSHR EXE RD WRT NOVEC QUAD 
pee renr ena em mm eae emo me mam + 
H Performance indicators H 
Phase Page faults CPU Time Elapsed Time 
Initialization 29 BO 8 00-08 00:00:00.44 
zomnene processing 111 0:00:00.45 00:00:04.35 
431 ees ee ES ab ey Bed 
Soatal table sort 0 0: 8:81 - Se 00:00:0 £6 
Pass 2 280 8880: 08°% es SO 
Symbol table output 34 i 17 00:00:00.38 
Psect synopsis output 1 00:00:00.01 00:00:00.01 
Cross-reference output 0 00:00:00.00 00:00:00.00 
Assembler run totals 888 00:00:16.47 00:01:06.72 


The working set Limit was 2100 pages. 

93941 bytes (184 pages) of virt memory were used to buffer the intermediate code. 

There were 80 pages of symbol table space allocated to hold non-local and 96 Local symbols. 
source Lines were read in Pass 1, ghey 23 object records in Pass 2. 

34 pages of virtual memory were used to define 32 macros. 
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Macro Library name 


-$255$DUA28: CSYSLOA.OBJJ790DEF .MLB; 1 5 
“$255$DUA28: (SYS .OBJJLIB.MLB; 1 17 
Sitti # SYSLIBISTARLET. MLB; 2 7 
TOTALS (all Libraries) 29 


1542 GETS were required to define 29 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=LIS$:MCHECK790/0BJ=OBJ$:MCHECK790 MSRC$:MCHECK790/UPDATE=(ENHS :MCHECK790) +EXECML$/LIB+LIB$: 790DEF/LIB 
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